完全介绍及其说明手册ExcelVBA典型实例大全通过368个例子掌握.doc

《完全介绍及其说明手册ExcelVBA典型实例大全通过368个例子掌握.doc》由会员分享，可在线阅读，更多相关《完全介绍及其说明手册ExcelVBA典型实例大全通过368个例子掌握.doc（139页珍藏版）》请在得力文库 - 分享文档赚钱的网站上搜索。

1、-_完全手册完全手册 Excel VBA 典型实例大全：通过典型实例大全：通过 368 个例子掌握个例子掌握目录第第 1 章章 宏的应用技巧宏的应用技巧宏是一个 VBA 程序，通过宏可以完成枯燥的、频繁的重复性工作。本章的实例分别介绍在 Excel 2003、Excel 2007 中录制宏、使用 Visual Basic 代码创建宏的方法，最后还以实例演示运行宏和编辑宏的方法。1.1 创建宏 1例 001 在 Excel 2003 中录制宏 1例 002 打开 Excel 2007 的录制宏功能 3例 003 在 Excel 2007 中录制宏 4例 004 使用 Visual Basic 创

2、建宏 51.2 管理宏 6例 005 运行宏 7例 006 编辑宏 8第第 2 章章 VBE 使用技巧使用技巧VBE（Visual Basic Editor）是编写 VBA 代码的工具，在上一章中曾使用 VBE 编辑宏代码。本章的实例介绍了设置 VBE 操作环境、在 VBE 中管理工程代码、使用 VBE 的辅助工具提高代码输入效率等方法。2.1 设置 VBE 操作环境 10例 007 停靠 VBE 子窗口 10例 008 定制 VBE 环境 122.2 工程管理 13例 009 增加模块 13-_例 010 删除模块 15例 011 导出模块 16例 012 导入模块 172.3 管理代码 1

3、8例 013 属性/方法列表 18例 014 常数列表 19例 015 参数信息 20例 016 自动完成关键字 21第第 3 章章 程序控制流程技巧程序控制流程技巧结构化程序设计中使用的基本控制结构有 3 种：顺序结构、选择结构和循环结构。本章以实例演示了 VBA 中这三种控制结构的控制语句，最后还介绍了在 VBA 中使用数组的方法。3.1 常用输入/输出语句 23例 017 九九乘法表（Print 方法的应用） 23例 018 输入个人信息（Inputbox 函数的应用） 24例 019 退出确认（Msgbox 函数的应用） 253.2 分支结构 27例 020 突出显示不及格学生 27例

4、 021 从身份证号码中提取性别 29例 022 评定成绩等级 30例 023 计算个人所得税 323.3 循环结构 34-_例 024 密码验证 34例 025 求最小公倍数和最大公约数 36例 026 输出 ASCII 码表 37例 027 计算选中区域数值之和 39例 028 换零钱法（多重循环） 403.4 使用数组 42例 029 数据排序 42例 030 彩票幸运号码 44例 031 用数组填充单元格区域 46第第 4 章章 Range 对象操作技巧对象操作技巧用户在使用 Excel 时，大部分时间都是在操作单元格中的数据，同样地，在 Excel 中使用 VBA 编程时，也需要频繁

5、地引用单元格区域。本章实例介绍用 VBA 引用单元格、获取单元格信息、操作单元格数据、设置单元格格式等内容。4.1 获取单元格的引用 48例 032 使用 A1 样式引用单元格 48例 033 使用索引号引用单元格 49例 034 引用多个单元格区域 50例 035 合并单元格区域 51例 036 引用合并区域的子区域 52例 037 动态选中单元格区域 53例 038 引用相对其他单元格的单元格 54例 039 扩展单元格区域 55-_例 040 引用单元格交叉区域 56例 041 引用当前区域 57例 042 获取已使用区域 58例 043 引用区域内的单元格 59例 044 设置标题行格

6、式 61例 045 选取条件格式单元格 62例 046 选择数据列末单元格 63例 047 获取某列连续数据区域 64例 048 获取多个不同长度的非连续列 65例 049 当前单元格的前后单元格 65例 050 获取三维区域 664.2 获取单元格信息 67例 051 获取标题行和数据行 67例 052 获取当前区域信息 68例 053 单元格区域是否有公式 69例 054 追踪公式单元格 70例 055 获取单元格地址 714.3 操作单元格 72例 056 合并相同值单元格 72例 057 删除指定字符后的内容 73例 058 给单元格设置错误值 75-_例 059 活动单元格错误类型

7、76例 060 自动设置打印区域 77例 061 按设置长度换行 77例 062 选择不含公式的单元格 79例 063 生成不重复随机数 80例 064 拆分单元格 82例 065 添加超链接 83例 066 删除超链接 84例 067 限制单元格移动范围 85例 068 插入批注 86例 069 隐藏/显示批注 87例 070 删除批注 87例 071 复制单元格区域 88例 072 给单元格设置公式 90例 073 复制公式 90例 074 查找并填充空白单元格 91例 075 清除单元格 92例 076 删除单元格区域 934.4 设置单元格格式 94例 077 按颜色统计单元格数量 9

8、4例 078 获取单元格底纹和图案 95-_例 079 设置页眉为单元格值 96例 080 设置日期格式 97例 081 生成大写金额 98例 082 格式化当前区域的数据 100例 083 设置自动套用格式 101例 084 突出显示当前位置 101例 085 设置边框线 103例 086 设置文本对齐格式 104例 087 单元格文本缩排 105例 088 设置文本方向 107例 089 设置自动换行格式 108例 090 设置缩小字体填充 108例 091 设置条件格式 109例 092 设置单元格图案 111例 093 合并单元格 112第第 5 章章 Worksheet 对象操作技巧

9、对象操作技巧Worksheet 对象表示 Excel 工作簿中的工作表，Worksheet 对象是 Worksheets 集合的成员。在 VBA 中，通过操作 Worksheet 对象和 Worksheets 集合对象，即可控制 Excel 的工作表。本章实例介绍了用 VBA 代码操作工作表、操作工作表行和列、通过工作表事件控制工作表等内容。5.1 控制工作表集合 114例 094 增加工作表 114例 095 窗体方式新增工作表 115-_例 096 窗体方式删除工作表 118例 097 批量新建工作表 119例 098 获取工作表数 120例 099 循环激活工作表 121例 100 选择

10、工作表 121例 101 选取前一个工作表/后一个工作表 122例 102 选中工作表的名称 123例 103 保护工作表 124例 104 撤销工作表的保护 126例 105 判断工作表是否存在 127例 106 工作表排序 129例 107 复制工作表 130例 108 移动工作表 131例 109 删除工作表 132例 110 删除空工作表 133例 111 密码控制删除工作表 134例 112 隐藏/显示工作表 135例 113 工作表移至最前/最后 136例 114 工作表打印页数 137例 115 重命名工作表 138例 116 设置工作表标签颜色 140-_例 117 导出工作表

11、 1415.2 操作工作表的行和列 144例 118 删除空行 144例 119 插入行 145例 120 插入多行 146例 121 插入列 147例 122 隐藏/显示行 148例 123 隐藏/显示列 149例 124 设置行高 149例 125 设置列宽 1515.3 操作工作表 152例 126 合并工作表数据 152例 127 工作表是否被保护 153例 128 制作工作表目录 154例 129 删除图片 155例 130 修改工作表的代码名 1565.4 控制工作表事件 158例 131 为输入数据的单元格添加批注 158例 132 自动填充相同值 159例 133 记录同一单元

12、格多次输入值 160例 134 禁止选中某个区域 161-_例 135 禁止输入相同数据 162例 136 设置滚动区域 163例 137 自动添加边框线 164例 138 限制在数据区域下一行输入数据 165例 139 增加快捷菜单 166例 140 限制选择其他工作表 168例 141 自动隐藏工作表 169例 142 将原数据作批注 170例 143 输入编码 171第 6 章 Workbook 对象操作技巧Workbook 对象表示 Excel 工作簿，Workbooks 集合对象表示 Excel 中所有打开的工作簿。本章实例介绍 VBA 控制工作簿的方法，包括对工作簿集合和工作簿的操

13、作、通过工作簿事件控制工作簿的操作。6.1 操作工作簿集合 173例 144 批量新建工作簿 173例 145 设置背景音乐 174例 146 打开工作簿 176例 147 保存工作簿 177例 148 更名保存工作簿 178例 149 将工作簿保存为 Web 页 180例 150 打开文本文件 181例 151 设置工作簿密码 182-_例 152 保护工作簿 184例 153 查看文档属性 185例 154 处理命名单元格区域 187例 155 判断工作簿是否存在 190例 156 判断工作簿是否打开 191例 157 备份工作簿 192例 158 获取关闭工作簿中的值（方法 1） 194

14、例 159 获取关闭工作簿中的值（方法 2） 196例 160 多工作簿数据合并 1976.2 控制工作簿事件 199例 161 自动打开关联工作簿 199例 162 禁止拖动单元格 200例 163 设置新增工作表为固定名称 201例 164 退出前强制保存工作簿 202例 165 限制打印 203例 166 限制保存工作簿 204例 167 限制工作簿使用次数 205例 168 限制工作簿使用时间 207例 169 设置应用程序标题 207例 170 根据密码打开工作簿 209例 171 打开工作簿禁用宏 210-_例 172 用 VBA 删除宏代码 212第 7 章 Applicatio

15、n 对象操作技巧Application 对象代表整个 Excel 应用程序，使用 Application 对象可控制应用程序范围的设置和选项。本章实例介绍使用 VBA，通过 Application 对象自定义 Excel 外观、设置 Excel操作选项、控制 Excel 应用程序，以及通过 Application 对象的 OnTime 方法和 OnKey 方法响应用户操作的内容。7.1 自定义 Excel 外观 214例 173 显示/关闭编辑栏 214例 174 设置状态栏 215例 175 控制鼠标指针形状 217例 176 全屏幕显示 218例 177 最大化 Excel 窗口 219例

16、 178 查询计算机信息 2197.2 设置 Excel 操作选项 220例 179 关闭屏幕刷新 220例 180 禁止弹出警告信息 222例 181 复制/剪切模式 223例 182 获取系统路径 2247.3 控制应用程序 225例 183 激活 Microsoft 应用程序 225例 184 控制最近使用文档 226例 185 文件选择器 228例 186 快速跳转 230-_例 187 激活 Excel 2007 的功能区选项卡 2327.4 Application 对象事件处理 234例 188 工作表上显示时钟 234例 189 整点报时 235例 190 自定义功能键 236第

17、 8 章 Window 对象操作技巧Window 对象代表一个窗口，许多工作表特征（如滚动条和标尺）实际上是窗口的属性。本章实例介绍用 VBA 控制窗口的方法，包括通过 Window 对象的属性和方法创建、拆分窗口、设置窗口大小、显示比例、控制窗口显示状态等。8.1 控制窗口 238例 191 创建窗口 238例 192 调整窗口大小 239例 193 获取窗口状态 242例 194 拆分窗格 243例 195 并排比较窗口 244例 196 排列窗口 245例 197 窗口显示比例 2468.2 控制工作表的显示选项 248例 198 工作簿显示选项 248例 199 工作表显示选项 249

18、例 200 工作表网格线 250例 201 获取指定窗口选中的信息 252-_第 9 章 Chart 对象操作技巧在 Excel 中可以快速简便地创建图表。在程序中，通过 VBA 代码也可方便地创建图表。本章实例介绍用 VBA 创建图表（包括嵌入式图表） 、控制图表中的对象、通过图表事件响应用户操作等内容。9.1 创建图表 254例 202 创建图表工作表 254例 203 创建嵌入图表 255例 204 转换图表类型 257例 205 删除图表 2589.2 控制图表对象 260例 206 获取嵌入图表的名称 260例 207 获取图表标题信息 260例 208 获取图例信息 262例 20

19、9 获取图表坐标轴信息 263例 210 获取图表的系列信息 264例 211 判断工作表的类型 265例 212 重排嵌入图表 266例 213 调整图表的数据源 268例 214 为图表添加阴影 269例 215 显示数据标签 271例 216 将图表保存为图片 273例 217 设置图表颜色 274-_例 218 按值显示颜色 276例 219 修改嵌入图表外形尺寸 277例 220 修改图表标题 279例 221 修改坐标轴 280例 222 图表插入到 Word 文档 2829.3 图表事件 283例 223 激活图表工作表 283例 224 显示图表各子对象名称 284例 225

20、捕获嵌入图表事件 285第 10 章 用户界面设计技巧在 Excel 中，用户大部分时间是在工作表中进行操作。在 Excel 中，也可以设计用户窗体，用户直接在窗体上进行操作，而将工作表作为保存数据的地方。本章实例介绍在 VBA中调用 Excel 内置对话框、在 VBE 中创建自定义窗体等内容。10.1 使用内置对话框 288例 226 显示打开对话框（使用 GetOpenFilename 方法） 288例 227 显示保存文件对话框（使用 GetSaveAsFilename 方法） 290例 228 显示内置对话框 291例 229 用 VBA 调用 Excel 2007 功能区功能 293

21、10.2 创建自定义窗体 294例 230 制作 Splash 窗口 294例 231 控制窗体显示 295例 232 列表框间移动数据 297-_例 233 通过窗体向工作表添加数据 302例 234 制作多页窗体报名登记 305例 235 通过窗体设置单元格格式 307例 236 用窗体控制工作表显示比例 308例 237 调色板窗体 311例 238 在窗体中显示图表 312例 239 制作向导窗体 314例 240 拖动窗体上的控件 317例 241 制作交通信号灯 318例 242 制作进度条 320第 11 章 命令栏和功能区操作技巧在 Excel 2007 中，以新的功能区取代了

22、以前版本的命令栏（包括菜单栏和工具栏） 。本章实例分别介绍了用 VBA 控制 Excel 2003 以前版本的命令栏、用 XML 自定义 Excel 2007功能区等内容。11.1 控制命令栏 322例 243 显示内置菜单和工具栏的 ID 322例 244 创建自定义菜单 323例 245 删除自定义菜单 325例 246 创建快捷菜单 326例 247 禁止工作表标签快捷菜单 328例 248 屏蔽工作表标签部分快捷菜单 32911.2 Excel 2007 的功能区 330-_例 249 创建功能区选项卡 330例 250 禁用 Office 按钮的菜单 332例 251 在“Offic

23、e 按钮”中新建菜单 333例 252 重定义“Office 按钮”菜单项功能 335例 253 为内置选项卡增加功能 336第 12 章 Excel 处理工作表数据技巧通过 Excel 相关对象可对工作表中的数据进行操作，如处理单元格区域的公式、对数据进行查询、排序、筛选等操作。本章实例介绍了用 VBA 处理公式，对数据进行查询、排序、筛选等内容。12.1 处理公式 339例 254 判断单元格是否包含公式 339例 255 自动填充公式 340例 256 锁定和隐藏公式 341例 257 将单元格公式转换为数值 342例 258 删除所有公式 343例 259 用 VBA 表示数组公式 3

24、4512.2 数据查询 346例 260 查找指定的值 346例 261 带格式查找 349例 262 查找上一个/下一个数据 349例 263 代码转换 351例 264 模糊查询 353-_例 265 网上查询快件信息 354例 266 查询基金信息 357例 267 查询手机所在地 358例 268 使用字典查询 36012.3 数据排序 361例 269 用 VBA 代码排序 362例 270 乱序排序 363例 271 自定义序列排序 364例 272 多关键字排序 366例 273 输入数据自动排序 367例 274 数组排序 369例 275 使用 Small 和 Large 函

25、数排序 370例 276 使用 RANK 函数排序 372例 277 姓名按笔画排序 37412.4 数据筛选 376例 278 用 VBA 进行简单筛选 377例 279 用 VBA 进行高级筛选 378例 280 筛选非重复值 380例 281 取消筛选 381第 13 章 Excel 处理数据库技巧通过 VBA 代码，可在 Excel 中访问数据库。本章实例介绍通过 ADO 访问 Excel 工作簿中的数据、在 Excel 中处理 Access 数据库（包括获取、添加、修改、删除记录，创建 Access-_数据）等内容。13.1 用 ADO 访问 Excel 工作表 383例 282 使

26、用 ADO 连接数据库 383例 283 从工作表中查询数据 384例 284 使用 ADO 导出数据 386例 285 汇总数据 387例 286 不打开工作簿获取工作表名称 38813.2 处理 Access 数据库 390例 287 从 Access 中获取数据 390例 288 添加数据到 Access 391例 289 创建 Access 数据库 393例 290 是否存在指定表 395例 291 列出数据库的表名 396例 292 列出数据表的字段信息 398例 293 修改记录 399例 294 删除记录 401第 14 章 创建加载宏技巧在 Excel 中，通过加载宏可以扩展功

27、能，加载宏是为 Excel 提供自定义命令或自定义功能的补充程序。本章实例介绍了在 Excel 中通过 VBA 代码创建 Excel 加载宏和 COM 加载宏的方法。14.1 创建加载宏的方法 404例 295 创建 Excel 加载宏 404-_例 296 创建 COM 加载宏 408例 297 系统加载宏列表 41314.2 常用加载宏示例 414例 298 时间提示 414例 299 大写金额转换 416例 300 计算个人所得税 418例 301 加盖公章 419第 15 章 文件和文件夹操作技巧通过 VBA 代码可在 Excel 中操作文件。有两种方式访问操作文件和文件夹：一是使用过

28、程形式的 VB 访问和操作方法，另一种是将文件系统作为对象的文件对象模型方式。本章实例介绍了用 VB 语句操作文件和文件夹、用 FSO 操作文件和文件夹的内容。15.1 用 VB 语句操作文件和文件夹 422例 302 显示指定文件夹的文件 422例 303 判断文件（文件夹）是否存在 424例 304 新建文件夹 425例 305 复制文件 426例 306 重命名文件或文件夹 427例 307 删除文件 429例 308 查看文件属性 43015.2 用 FSO 操作文件和文件夹 432例 309 判断文件是否存在（FSO） 432例 310 分离文件名和扩展名 434-_例 311 新建

29、和删除文件夹（FSO） 435例 312 复制文件（FSO） 437例 313 复制文件夹（FSO） 439例 314 列出文件夹名称 440例 315 显示文件属性 441例 316 删除所有空文件夹 442例 317 显示驱动器信息 444第 16 章 文本文件操作技巧 上一章介绍了对文件进行复制、删除之类的操作，更多的时候用户还需要从文本文件中读取数据，或向文本文件中写入数据。本章实例介绍用 VBA 操作文本文件的内容，包括用 VB 语句操作文本文件和用 FSO 操作文本文件。16.1 用 VB 语句操作文本文件 446例 318 创建文本文件 446例 319 读取文本文件数据 448

30、例 320 工作表保存为文本文件 450例 321 导出批注到文本文件 451例 322 从文本文件导入批注 45316.2 用 FSO 操作文本文件 455例 323 创建文本文件（FSO） 455例 324 添加数据到文本文件（FSO） 456例 325 读取文本文件数据（FSO） 458第 17 章 用 Excel 控制其他程序技巧 -_在 Excel 中，通过 VBA 代码可调用其他应用程序的功能。包括创建和打开 Word 文档、创建和打开幻灯片、发送和导入 Outlook 邮件等。另外，使用 VBA 提供的 Shell 函数还可打开 Windows 中的其他程序、打开控制面板对应的选

31、项等。17.1 控制 Office 应用程序 460例 326 打开 Word 文档 460例 327 从 Word 文档中获取数据 462例 328 生成成绩通知书 464例 329 在 Excel 中打开 PPT 469例 330 在 Excel 中创建 PPT 470例 331 使用 SendMail 发送邮件 473例 332 用 Outlook 发送邮件 474例 333 导入 Outlook 中的邮件 476例 334 保存 Outlook 中的附件 47817.2 调用其他程序 479例 335 运行系统自带程序 479例 336 在 Excel 中打开控制面板 481第 18

32、章 VBE 工程实用操作技巧在第 2 章中介绍了 VBE 的使用方法。其实，VBE 也包含一个对象模型，通过该对象模型可控制 VBA 工程的主要元素。本章实例介绍通过 VBE 对象模型，用 VBA 代码添加或删除模块、创建用户窗体、生成 VBA 代码等内容。18.1 显示工程相关信息 483例 337 显示工程信息 483例 338 列出工程所有组件 485-_例 339 显示工作簿中 VBA 的过程名 486例 340 导出 VBA 过程代码 488例 341 列出工程引用的外部库 48918.2 动态创建组件 490例 342 重命名组件 490例 343 导出/导入模块代码 492例 3

33、44 删除指定子过程代码 494例 345 查找代码 496例 346 增加模块 498例 347 增加类模块 500例 348 控制 VBE 的子窗口 501例 349 工作表中动态增加按钮 502例 350 创建动态用户窗体 504第 19 章 VBA 程序调试优化技巧 Excel 应用程序的顺利完成，调试的过程是非常重要的。本章实例介绍 Excel VBA 调试程序的基本方法和 VBA 程序的优化技巧。19.1 VBA 程序调试技巧 507例 351 设置断点 507例 352 使用本地窗口 508例 353 使用立即窗口 510例 354 单步执行 510例 355 运行选定部分代码

34、512-_例 356 调用堆栈 513例 357 使用监视窗口 514例 358 使用条件编译 515例 359 错误处理语句 51719.2 VBA 程序优化技巧 518例 360 使用 VBA 已有功能 518例 361 避免使用变体 520例 362 使用对象变量 521例 363 使用数组处理单元格 522例 364 检查字符串是否为空 522例 365 优化循环体 523例 366 使用 For Each 循环 525例 367 关闭屏幕刷新 526例 368 使用内置函数 527VBA 应用程序由一系列的 VBA 代码组成，这些代码将按照一定的顺序执行。有时程序根据一定的条件只能执

35、行某一部分代码，有时需要重复执行某一段代码。通过程序结构控制代码来完成这些功能，本章介绍这些程序控制流程方面的技巧。3.1 常用输入常用输入/输出语句输出语句结构化程序设计中使用的基本控制结构有 3 种：顺序结构、选择结构和循环结构。顺序结构就是按照语句的书写顺序从上到下、逐条语句地执行。执行时，编写在前面的代码先执行，编写在后面的代码后执行。这是最普遍的结构形式，也是后面两种结构的基础。顺序结构不需要使用结构控制语句，本节介绍常用的输入输出语句的技巧。例例 017 九九乘法表（九九乘法表（Print 方法的应用）方法的应用）-_1案例说明案例说明在早期的 Basic 版本中，程序运行结果主要

36、依靠 Print 语句输出到终端。在 VB 中，Print 作为窗体的一个方法，用来在窗体中显示信息。但是在 VBA 中，用户窗体已经不支持 Print 方法了。在 VBA 中，Print 方法只能向“立即窗口”中输出程序的运行中间结果，供开发人员调试程序时使用。本例使用 Print 方法在立即窗口中输入九九乘法表。2关键技术关键技术在 VBA 中，Print 方法只能应用于 Debug 对象，其语法格式如下：Debug.Print outputlist参数 outputlist 是要打印的表达式或表达式的列表。如果省略，则打印一个空白行。 Print 首先计算表达式的值，然后输出计算的结果。

37、在 outputlist 参数中还可以使用分隔符，以格式化输出的数据。格式化分隔符有以下几种： Spc(n)：插入 n 个空格到输出数据之间； Tab(n)：移动光标到适当位置，n 为移动的列数； 分号：表示前后两个数据项连在一起输出； 逗号：以 14 个字符为一个输出区，每个数据输出到对应的输出区。3编写代码编写代码（1）在 VBE 中，单击菜单“插入/模块”命令插入一个模块。（2）在模块中输入以下代码：Sub multi()For i = 1 To 9For j = 1 To i-_Debug.Print i; “x“; j; “=“; i * j; “ “;NextDebug.Print

38、 换行NextEnd Sub（3）按功能键“F5”运行子过程，在“立即窗口”输出九九乘法表，如图 3-1 所示。图 3-1 立即窗口例例 018 输入个人信息（输入个人信息（Inputbox 函数的应用）函数的应用）1案例说明案例说明本例演示 Inputbox 函数的使用方法。执行程序，将弹出“输入个人信息”对话框，要求用户输入“姓名、年龄、地址”信息，然后在“立即窗口”中将这些信息打印输出。2关键技术关键技术为了实现数据输入，VBA 提供了 InputBox 函数。该函数将打开一个对话框作为输入数据的界面，等待用户输入数据，并返回所输入的内容。其语法格式如下：InputBox(prompt,

39、 title , default , xpos , ypos , helpfile, context) 各参数的含义如下： Prompt：为对话框消息出现的字符串表达式。其最大长度为 1024 个字符。如果需要在对话框中显示多行数据，则可在各行之间用回车符换行符来分隔，一般使用VBA 的常数 vbCrLf 代表回车换行符。 Title：为对话框标题栏中的字符串。如果省略该参数，则把应用程序名放入标题栏中。-_ Default：为显示在文本框中的字符串。如果省略该参数，则文本框为空。 Xpos：应和 Ypos 成对出现，指定对话框的左边与屏幕左边的水平距离。如果省略该参数，则对话框会在水平方向居

40、中。 Ypos：应和 Xpos 成对出现，指定对话框的上边与屏幕上边的距离。如果省略该参数，则对话框被放置在屏幕垂直方向距下边大约三分之一的位置。 Helpfile：设置对话框的帮助文件，可省略。 Context：设置对话框的帮助主题编号，可省略。3编写代码编写代码（1）在 VBE 中，单击菜单“插入/模块”命令插入一个模块。（2）在模块中输入以下代码：Sub inputinfo()Title = “输入个人信息“name1 = “请输入姓名：“age1 = “请输入年龄：“address1 = “请输入地址：“strName = InputBox(name1, Title)age = Inp

41、utBox(age1, Title)Address = InputBox(addres1, Title)Debug.Print “姓名：“; strNameDebug.Print “年龄：“; ageDebug.Print “地址：“; AddressEnd Sub-_（3）按功能键“F5”运行子过程，将弹出“输入个人信息”窗口，如图 3-2 所示。在对话框中输入内容后按“回车” ，或单击“确定”按钮。（4）接着输入“年龄”和“地址”信息，在“立即窗口”中将输出这些内容，如图 3-3 所示。图 3-2 输入个人信息 图 3-3 输出结果例例 019 退出确认（退出确认（Msgbox 函数的应用

42、）函数的应用）1案例说明案例说明在应用程序中，有时用户会由于误操作关闭 Excel，为了防止这种情况，可在退出 Excel 之前弹出对话框，让用户确认是否真的要关闭 Excel。本例使用 Msgbox 函数弹出对话框，让用户选择是否退出系统。2关键技术关键技术使用 MsgBox 函数可打开一个对话框，在对话框中显示一个提示信息，并让用户单击对话框中的按钮，使程序继续执行。MsgBox 函数语法格式如下：Value=MsgBox(prompt,buttons,title ,helpfile,context)通过函数返回值可获得用户单击的按钮，并可根据按钮的不同而选择不同的程序段来执行。该函数共有

43、 5 个参数，除第 1 个参数外，其余参数都可省略。各参数的意义与 Inputbox 函数参数的意义基本相同，不同的地方是多了一个 buttons 参数，用来指定显示按钮的数目及形式、使用提示图标样式、默认按钮以及消息框的强制响应等。其常数值如表 3-1 所示。表 3-1 按钮常数值常 量值说 明vbOkOnly0只显示“确定”（Ok）按钮-_vbOkCancel1显示“确定”（Ok）及“取消”（Cancel）按钮vbAbortRetryIgnore2显示“异常终止”（Abort）、“重试”（Retry）及“忽略”（Ignore）按钮vbYesNoCancel3显示“是”（Yes）、“否”（N

44、o）及“取消”（Cancel）按钮续表 常 量值说 明vbYesNo4显示“是”（Yes）及“否”（No）按钮vbRetryCancel5显示“重试”（Retry）及“取消”（Cancel）按钮vbCritical16显示 Critical Message 图标vbQuestion32显示 Warning Query 图标vbExclamation48显示 Warning Message 图标vbInformation64显示 Information Message 图标vbDefaultButton10以第一个按钮为默认按钮vbDefaultButton2256以第二个按钮为默认按钮vbDefaultButton3512以第三个按钮为默认按钮vbDefaultButton4768以第四个按钮为默认按钮vbApplicationModal0进入该消息框，当前应用程序暂停vbSystemModal4096进入该消息框，所有应用程序暂停表 3-1 中的数值（或常数）可分为四组，其作用分别为： 第一组值（05）用来决定对话框中按钮的类型与数量。 第二组值（16，32，48，64）用来决定对话框中显示的图标。 第三组值（0，256，512）设置对话框的默认活动按钮。活动按钮中文字的周转有虚线，按回