Sub 宏命令()If MsgBox("是否确定要运行此宏？", vbYesNo + vbInformation) = vbNo Then Exit Sub'============='以下为要执行的宏代码End Sub
If MsgBox("是否确定要运行此宏？", vbYesNo + vbExclamation,"是否继续？") = vbNo Then Exit Sub
