Excel VBA:如何从代码中触发事件？

我想知道是否存在我应该注意的陷阱.

是的,有一个主要的陷阱.该Selection必然可能不是一个范围.看这个例子

插入一个按钮

插入空白图表

在图表中插入图像.让图像突出显示

假设我们有这个代码

Private Sub CommandButton1_Click()
    Call Worksheet_BeforeDoubleClick(Selection, True)
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    MsgBox Target.Address
End Sub

现在按下按钮,您将收到错误消息.

工作表事件在需要时也会触发......当选择不合适时,它们不会触发.

说了这么多,你CAN让你的命令按钮的代码工作像这样

Private Sub CommandButton1_Click()
    '~~> Check if what the user selected is a valid range
    If TypeName(Selection) = "Range" Then
        Call Worksheet_BeforeDoubleClick(Selection, True)
    Else
        MsgBox "Not a Valid Range"
    End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    MsgBox Target.Address
End Sub

但是然后你将放置所有和所有CHECKS的地方:)最好的方法是将它放在一个Sub中,如同@Sam建议,然后从中调用它Button/Worksheet_BeforeDoubleClick.

如果您仍想从按钮调用它,请确保所有相关检查都已到位,包括正确的错误处理程序.