地平线-明月

1.先录入一个宏，例如：

Sub Test()
……
End Sub
' 宏名为Test

2.单击"视图"菜单－"工具栏"－"控件工具箱"

在弹出的"控件工具箱"里面选择"命令按钮"。然后在工作表Sheet1上面画一个按钮。关闭"控件工具箱"。
对这个按钮单击鼠标右键，选择"命令按钮对象"－"编辑"。修改一下该按钮显示的名称，如"测试"。或者你可以对这个按钮单击鼠标右键，选择"属性"对该按钮进行详细的编辑。

3.调整好该按钮的大小和位置

4.右键点击该按钮后选择查看代码，然后可以看到下列代码：
Private Sub CommandButton1_Click()

End Sub

在其中间加入一句代码
Test '上面定义的宏名

最后代码与下面的相似：

Private Sub CommandButton1_Click()
Test
End Sub