VBA怎么写确定取消对话框

如果点确定就继续下去取消则endsub

举报该问题

推荐答案推荐于2017-09-03

就增加这么一句就可以（粗体内容自己改，, "Hi"可以去掉的）：
If MsgBox("Continue?", vbYesNo, "Hi") = vbNo Then Exit Sub

温馨提示：答案为网友推荐，仅供参考

当前网址：http://77.wendadaohang.com/zd/IWWqvvYNp.html

相似回答

inputbox 对话框 点击“确定” “取消”,vba怎么写答：dim ans As Variant ans = MsgBox(输入你要显示的内容, vbOKCancel + vbDefaultButton2)If ans = vbOK Then ... 点确认执行的代码 Else ... 点取消执行的代码 End If 如果是inputbox的话本身就自带确定和取消的，例如：dim aaa as string aaa=inputbox(输入你要显示的语句）这样就可以...

vba中,输入框点取消(或空时点确定)后,弹出对话框,点否或取消反回到输入...答：Sub 删除重复行两者情况都有()Dim i As Integer, x As Integer, y As Integer, z As String Do z = InputBox("请选择所要删除重复行的列")If z = "" Then If MsgBox("确定退出?", vbYesNoCancel + vbExclamation, "询问") = vbYes Then Exit Sub End If Loop While z = ""'执...

excel的VBA中,在程序运行过程中取消提示等对话框用那个语句?答：Application.DisplayAlerts = False ’打开提示 Application.DisplayAlerts = True

excel vba 弹出msg对话框以后我怎么要确认两次才能关闭?答：再次触发worksheet_change事件。如果是以上原因，可以在worksheet_change事件中增加一句判断代码如下 if target.address="$A$1" then'如果需要监控的单元格地址为A1，那么就执行if内的代码。否则退出执行worksheet_change事件。endif 说起来拗口，好好理解下几个事件间的逻辑关系就好解决了。

Excel中用VBA写一个判断并弹出对话框答：Range("B1") '假设B1内容，实际当中自行编写 If A1 > B1 Then Rsp = MsgBox("A1已大于A2，请确定继续?", vbYesNo)If Rsp = vbNo Then ThisWorkbook.Close End If End If End Sub实际输入上述代码，可采用vba编辑器，选择对应的工作表，再选择相应事件SelectionChange，复制输入上述代码。

Excel中用VBA写一个判断并弹出对话框答：1、首先我们打开一个excel，这里建议使用office excel，因为wps的excel开发工具中的VBA是灰色的，还需要下载相关的插件，如下图所示：2、接着我们在最上边的菜单栏中找到开发工具，然后找到Visual Basic，我们点击一下，就会出现一个新的页面，如下图所示：3、当然出现新页面也有一个快捷键就是alt+f11，...

求VBA语言,打开excel自动弹一个对话框选择是否答：在 ThisWorkbook 的 Open 事件，写入：Private Sub Workbook_Open()hh = MsgBox("是否打开此表？", vbOKCancel)If hh = vbCancel Then Application.Quit End Sub

大家正在搜

vba确定取消对话框 js确定取消对话框 EXCEL添加VBA自定义对话框怎么把对话框移上去对话框太大点不了确定对话框确定按钮看不到 vba打开对话框设定文件位置选择对话框选择不了是为什么 vba对话框

excel 的VBA中如何显示带“确定”、“取消”的消息框。

确定取消的VB代码怎么写？

Excel中用VBA写一个判断并弹出对话框

VBA清除按钮提示对话框

excel的VBA中，在程序运行过程中取消提示等对话框用那个...

弹出对话框的vba怎么写

vba中,输入框点取消（或空时点确定）后,弹出对话框,点否或...

excel vba 弹出msg对话框以后我怎么要确认两次才能...