Question

vba有关Sub Worksheet_Change(ByVal Target As Range)事件的问题

当前只在Sub Worksheet_Change(ByVal Target As Range)事件中，如何可以实现点击A1可以弹出一个userform，求大神解决

Answer 1

不要用 Worksheet.Change 事件，请用 Worksheet.SelectionChange 事件，

通过判断 Target 是否是 A1，来执行 userform.show 语句。

Answer 2

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'弹出窗体代码
End Sub
事件名错了

追问

我就是想问在Sub Worksheet_Change(ByVal Target As Range)事件中，有没有什么方法的，你说的那个事件我本来就知道可以的

Answer 3

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
a = Target.Row
b = Target.Column
If a = 1 And b = 1 Then
userform1.show
End If
End Sub