vba如何单元格改变自动运行macro

可以使用Worksheet_Change事件来实现单元格改变时自动运行宏。具体步骤如下：

1. 打开VBA编辑器，双击需要添加事件的工作表对象。

2. 在代码窗口中选择“Worksheet”和“Change”两个选项。

3. 在代码窗口中输入以下代码：

Private Sub Worksheet_Change(ByVal Target As Range)
    '判断目标单元格是否是需要运行宏的单元格
    If Target.Address = "$A$1" Then
        '运行需要执行的宏代码
        Call Macro1
    End If
End Sub

其中，“$A$1”是需要监视的单元格地址，如果该单元格发生变化，就会执行Macro1这个宏。

4. 在代码窗口中输入需要执行的宏代码，例如：

Sub Macro1()
    '在单元格A2中输入当前日期
    Range("A2").Value = Date
End Sub

这个宏的作用是在单元格A2中输入当前日期。

5. 关闭VBA编辑器并测试。当单元格A1的值改变时，宏将自动运行，并在单元格A2中输入当前日期。

注意：如果需要监视多个单元格，只需在代码中添加相应的判断语句即可。