VBA单击单元格并执行操作，非常简单，但对我来说不是

啊！ 我是VBA新手。 这可能是一个太简单的问题，但我正在努力使用VBA： 当一个单元格（1,1）被点击，因为它有1，msgbox会显示为“hi”

---

此代码属于工作表模块

右键单击“图纸”选项卡并选择“查看代码”

将此代码粘贴到此处：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        If Target = 1 Then
            MsgBox "hi"
        End If
    End If
End Sub

---

你能加一个按钮吗？这些都有事件。这不是完全正确的答案，因为如果单元格已经被选中（唯一的单元格），它不会触发。@6diegodiego9，这是OP正在寻找的答案。幸好你4年后出现发表评论。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        If Target = 1 Then
            MsgBox "hi"
        End If
    End If
End Sub