[已解决]msgbox

nsdyq

能不能通过msgbox来运行一个vba
msgbox按确定了，才运行vba
取消就不运行

最佳答案

月排行榜 / 总排行榜

爱疯

2015-7-27 23:41

Sub test1()
    If MsgBox("执行test2吗？", vbYesNo) = vbYes Then Call test2 Else MsgBox "我是test1，OVER!"
End Sub

Sub test2()
    MsgBox "我是test2，OVER!"
End Sub
A.rar (72.42 KB, 下载次数: 8)

2015-7-27 23:41 上传

点击文件名下载附件

跳转到最佳答案楼层

pengyx

upload attachment ，let me try

爱疯

Sub test1()
    If MsgBox("执行test2吗？", vbYesNo) = vbYes Then Call test2 Else MsgBox "我是test1，OVER!"
End Sub

Sub test2()
    MsgBox "我是test2，OVER!"
End Sub
A.rar (72.42 KB, 下载次数: 8)

2015-7-27 23:41 上传

点击文件名下载附件

wp8680

MsgBox函数返回值
常数
值
描述
vbOK
1
单击了“确定”按钮。
vbCancel
2
单击了“取消”按钮。
vbAbort
3
单击了“终止”按钮。
vbRetry
4
单击了“重试”按钮。
vbIgnore
5
单击了“忽略”按钮。
vbYes
6
单击了“是”按钮。
vbNo
7
单击了“否”按钮。