excel插入按钮

要求：当按一下此按钮时，弹出一个对话框问：“你确定要离开？”是，否。按 是，再弹出一个对话框，问“你真的要离开”是，否。按是，关闭excel。另外这个按钮颜色最好不是灰色的，彩色的最好。

在表格中拉出一个按钮，在属性中的Backcolor里可以改颜色，然后双击这个按钮，代码如下：
Private Sub CommandButton1_Click()
msg = MsgBox("你确定要离开吗？", vbYesNo, "提示")
If msg = vbYes Then
msg1 = MsgBox("你真的确定要离开吗？", vbYesNo, "提示")
End If

If msg1 = vbYes Then
Application.Workbooks.Close
End If
End Sub

excel菜单或图标已经有现成的。 如果文件没有保存，会提示 如果已经保存了，就不提示 忘记存盘是一种痛苦，是匆忙的代价！匆忙无法忍受太多的提示，否则，不过是感觉更累赘，痛苦的记忆更深刻。倒不如让一次性的提示来得慢些，即：点击按钮后，显示“请等候重要提示消息，按任意键取消退出”，同时倒计时1分钟，1分钟后，再弹出带确定按钮的消息框。 ——如果这1分钟期间停电，那就没有其他办法了。

yangliu0512 这位朋友这个代码是可以的，如果你真的显示手指图标的话，就改成这样吧！ Sub 提示离开() msg = MsgBox("你确定要离开吗？", vbYesNo, "提示") If msg = vbYes Then msg1 = MsgBox("你真的确定要离开吗？", vbYesNo, "提示") End If If msg1 = vbYes Then Application.Workbooks.Close End If End Sub 按alt+F11，弹出VBA编辑窗口，插入－模块，粘贴上面的代码，关闭这个窗口，返回到工作表界面，在工具栏上选择按钮工具，在工作表中拖运画一个按钮然后指定上面这个宏就可以了。

这个要看楼主的office版本是哪个了 2003版本的话：选择菜单里的“视图”-工具栏-控件工具箱，然后选择按钮即可 2007,2010的 开发工具-插入 里选择具体按钮的

没有这么麻烦的，直接设置超链接，找个图标贴进去，就好啦 记得给分