excel vba停止执行代码（退出执行）

Sub s()

[A8]="圣诞节"

End Sub

可否在代码前面加“BOX”弹出提示，提示内容“是否继续”，

当是表示执行下面的代码

当否表示不再执行（直接退出执行）。不能跳过执行其它的

可以加在任代码前面，如果不想继续就直接退出此操作。

满意答案

Sub s()    

n = MsgBox("是否继续？", vbYesNo)   

If n = vbNo Then 

Exit Sub    

[A8] = "圣诞节"

End Sub