Excel VBA ——msgbox对话框响应动作

 时间:2024-10-13 10:38:16

通过前面经验的学习,大家可以在对话框中设置各类按钮, 当单击这些按钮时,除了关闭对话框却没有其他反应。如果了解了单击按钮的相应返回值,就可以让程序来响应操作者的意图。

工具/原料

Excel 2013

程序晌应单击按钮的动作

1、常见的按钮的分类如下图所示

Excel VBA ——msgbox对话框响应动作

4、程序解释:(1)For x= 1 To 100:设置x 在1 ~ 100 之间进行循环。钱砀渝测(2)If x Mod 5 = 0 Then :判断当前值是否能被5 整除。其中Mod 是计算余数的运算符,如5Mod 2 的余数为1; 4 Mod 2 的余数为0。这里用除以5 的余数是否为0:来判断是否为5 的倍数。(3)Cells(x, 1) = x:设置当A 列的当前行的单元格等于当前的数值,如当X=4时,Cells( 4, 1 )的值(即A4 的值)等于4。(4)y =MsgBox("是否要继续填充数据”, 4):把单击对话框的按钮值赋予变量y 。这里值得注意的是,如果要取得函数的返回值,必须在函数名称后添加括号。(5)If y = 7 Then Exit Sub : 当单击了【是】按钮时,退出程序。因为7 是单击对话框【否】按钮的返回值,所以可以用y 的值是否为7 来判断是否单击了【否】

5、执行代码结果如下图所示:

Excel VBA ——msgbox对话框响应动作
  • Excel如何通过VBA实现窗口全屏显示效果?
  • VBA 删除重复行
  • excel中使用vba来指定工作薄序列的方法
  • Excel通过VBA实现自定义标题栏技巧!
  • 怎样使用VBA跨工作表控制不重复值?
  • 热门搜索
    青岛旅游景点介绍 旅游活动总结 始兴旅游景点大全 春秋旅游官方网站 国内旅游哪里好玩 第一步旅游 刘家峡旅游攻略 青岛有什么旅游景点 国际旅游小姐大赛 旅游英语口语视频