如何在Excel中加入一个命令按钮，并执行单击，双击事件

'单击事件：

Private Sub CommandButton1_Click()

    '执行代码

End Sub

'双击事件：

Private Sub CommandButton1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)

    '执行代码

End Sub

你不是已经新建了一个事件吗？就在那个事件的第一行后面加入下面代码： ,按钮名称.Click 通过此方法可以节省代码量，你也可以多在后面加几个，效果是共享事件。 说白了就把两个按钮放到一个事件中，使得他们做的动作一样。

---