自动执行Excel宏

时间:2011-03-20 15:55:53

标签: excel vba excel-vba

我有一个宏,它在ctrl-u的敲击下执行 - 我希望每次使用数字gt>时自动执行该宏0进入A2有没有简单的方法呢?

2 个答案:

答案 0 :(得分:2)

您可以在单元格内容更改时调用宏。打开Excel的Visual Basic编辑器,并将这样的内容添加到您希望宏自动运行的工作表中:

Private Sub Worksheet_Change(ByVal Target As Range)
  ' Column 1 is the A column
  If Target.Column = 1 And Target.Row = 2 Then
    If Target.Value > 0 Then
      ' call macro here
      MyMacroName
    End If
  End If
End Sub

答案 1 :(得分:0)

更简单的解决方案是。将其放在“ThisWorkBook”模块中

Private Sub Worksheet_Change(ByVal Target As Range)

  If Target.Address = Range("A2").Address and Target.Value >0 Then

      ' do something here
       MsgBox "This works!"

  End If
End Sub