Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 And Target.Row = 6 Then
Select Case Target.Value
Case 1
Target.Value = "BA"
Case 2
Target.Value = "XA"
End Select
End If
End Sub
为什么这语句在第2单元格中输入1不显示'BA'和第6单元格中输入1不显示'XA'
写错了,应该是在第2单元格中输入1不显示'BA'和第6单元格中输入1不显示'BA',
怎么写才能都可以在两个单元格中输入1都显示BA呢
写错了,应该是在第2单元格中输入1不显示'BA'和第6单元格中输入1不显示'BA',
怎么写才能都可以在两个单元格中输入1都显示BA呢
写错了,应该是在第2单元格中输入1不显示'BA'和第6单元格中输入1不显示'BA',
怎么写才能都可以在两个单元格中输入1都显示BA呢
你所说的第2个单元格的是A2,B2,C2还是什么2,第六个是A6,B6,还是什么6?
Target.Column = 2 or Target.Row = 6
如果你不懂,改上面的代码试试。
Target.Column = 2 or Target.Column = 6
试试这个,替代原来的Target.Column = 2 And Target.Row = 6就可以了。