Excel Limit宏设置文本框的范围

Excel Limit宏设置文本框的范围,excel,vba,Excel,Vba,我试图将一系列单元格链接到文本框,唯一的问题是如果我编辑文本框,它将写入任何单元格。我想把这种能力限制在C4到C11的特定范围内。这是我的密码: Dim PreviousCell As Range Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 3 Then ActiveSheet.TextBox1.Text = Target If Not Previou

我试图将一系列单元格链接到文本框,唯一的问题是如果我编辑文本框,它将写入任何单元格。我想把这种能力限制在C4到C11的特定范围内。这是我的密码:

Dim PreviousCell As Range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

   If Target.Column = 3 Then ActiveSheet.TextBox1.Text = Target



       If Not PreviousCell Is Nothing Then
       Debug.Print PreviousCell.Address
       End If

       Set PreviousCell = Target ' This needs to be the last line of code.

End Sub



Private Sub TextBox1_Change()

ActiveCell.Value = TextBox1

End Sub

对不起,我的英语可能不好,但我不明白你想做什么。您的意思是,如果您选择C4:C11范围内的单元格,那么您希望文本框显示所选单元格的值?它已经显示了,如果我单击随机单元格,而不是第3列,我可以通过文本框编辑该单元格。我只希望能够通过文本框编辑第3列。
Private Sub TextBox1_Change()

If ActiveCell.Column = 3 Then ActiveCell.Value = TextBox1

End Sub