“开发工具”--》“插入”打开控件箱，找到“按钮（窗体控件）”，然后在所需要的地方画出该按钮，如后，邮件点击这个按钮，选择“查看代码”，然后在VBA中下列的两条语句之间插入你的代码，保存返回Excel，再点击“开发工具”--》“设计模式”，让“设计模式”不被选中，这样，这个按钮就只能被点击，而不能被删除。PrivateSubCommandButton1_Click()EndSub
