1、VBA 常用技巧 代码解析 1 VBA 常用 技巧 目录 VBA 常用技巧 - 1 第 1 章 Range（单元格）对象 - 10 技巧 1 单元格的引用方法 - 10 1-1 使用 Range 属性 - 10 1-2 使用 Cells 属性 -11 1-3 使用快捷记号 -11 1-4 使用 Offset 属性 - 12 1-5 使用 Resize 属性 - 13 1-6 使用 Union 方法 - 14 1-7 使用 UsedRange 属性 - 14 1-8 使用 CurrentRegion 属性 - 15 技巧 2 选定单元格区域的方法 - 15 2-1 使用 Select 方法 -
2、15 2-2 使用 Activate 方法 - 16 2-3 使用 Goto 方法 - 17 技巧 3 获得指定行、列中的最后一个非空单元格 - 17 技巧 4 定位单元格 - 20 技巧 5 查找单元格 - 21 5-1 使用 Find 方法 - 21 5-2 使用 Like 运算符 - 25 技巧 6 替换单元格内字符串 - 26 技巧 7 复制单元格区域 - 27 技巧 8 仅复制数值到另一区域 - 30 8-1 使用选择性粘贴 - 30 8-2 直接赋值的方法 - 31 技巧 9 单元格自动进入编辑状态 - 32 技巧 10 禁用单元格拖放功能 - 32 技巧 11 单元格格式操作 -
3、 33 11-1 单元格字体格式设置 - 33 11-2 设置单元格内部格式 - 35 11-3 为单元格区域添加边框 - 36 11-4 灵活设置单元格的行高列宽 - 38 技巧 12 单元格中的数据有效性 - 39 12-1 在单元格中建立数据有效性 - 39 12-2 判断单元格是否存在数据有效性 - 41 12-3 动态的数据有效性 - 41 12-4 自动展开数据有效性下拉列表 - 43 技巧 13 单元格中的公式 - 44 VBA 常用技巧 代码解析 2 13-1 在单元格中写入公式 - 44 13-2 检查单元格是否含有公式 - 45 13-3 判断单元格公式是否存在错误 - 4
4、6 13-4 取得单元格中公式的引用单元格 - 47 13-5 将单元格中的公式转换为数值 - 48 技巧 14 单元格中的批注 - 49 14-1 判断单元格是否存在批注 - 49 14-2 为单元格添加批注 - 50 14-3 删除单元格中的批注 - 51 技巧 15 合并单元格操 作 - 52 15-1 判断单元格区域是否存在合并单元格 - 52 15-2 合并单元格时连接每个单元格的文本 - 53 15-3 合并内容相同的连续单元格 - 54 15-4 取消合并单元格时在每个单元格中保留内容 - 56 技巧 16 高亮显示单元格区域 - 57 技巧 17 双击被保护单元格时不显示提示消
5、息框 - 58 技巧 18 重新计算工作表指定区域 - 60 技巧 19 录入数据后单元格自动保护 - 60 技巧 20 工作表事件 Target 参数的使用方法 - 62 20-1 使用单元格的 Address 属性 - 62 20-2 使用 Column 属性和 Row 属性 - 63 20-3 使用 Intersect 方法 - 63 第 2 章 Worksheet（工作表）对象 - 65 技巧 21 引用工作表的方式 - 65 21-1 使用工作表的名称 - 65 21-2 使用工作表的索引号 - 65 21-3 使用工作表的代码名称 - 66 21-4 使用 ActiveSheet
6、属性引用活动工作表 - 66 技巧 22 选择工作表的方法 - 67 技巧 23 遍历工作表的方法 - 68 23-1 使用 For.Next 语句 - 68 23-2 使用 For Each.Next 语句 - 70 技巧 24 在工作表中上下翻页 - 71 技巧 25 工作表的添加与删除 - 72 技巧 26 禁止删除指定工作表 - 76 技巧 27 自动建立工作表目录 - 78 技巧 28 工作表的深度隐藏 - 80 技巧 29 防止更改工作表的名称 - 82 技巧 30 工作表中一次插入多行 - 83 技巧 31 删除工 作表中的空行 - 84 技巧 32 删除工作表的重复行 - 86
7、 技巧 33 定位删除特定内容所在的行 - 88 技巧 34 判断是否选中整行 - 89 技巧 35 限制工作表的滚动区域 - 90 VBA 常用技巧 代码解析 3 技巧 36 复制自动筛选后的数据区域 - 91 技巧 37 使用高级筛选获得不重复记录 - 93 技巧 38 工作表的保护与解除保护 - 94 技巧 39 奇偶页打印 - 97 第 3 章 Wordbook（工作簿）对象 - 99 技巧 40 工作簿的引用方法 - 99 40-1 使用工作簿的名称 - 99 40-2 使用工作簿的索引号 - 99 40-3 使用 ThisWorkbook - 100 40-4 使用 ActiveW
8、orkbook- 101 技巧 41 新建工作簿文件 - 101 技巧 42 打开指定的工作簿 - 103 技巧 43 判断指定工作簿是否打开 - 106 43-1 遍历 Workbooks 集合方法 - 106 43-2 错误处理方法 - 106 技巧 44 禁用宏则关闭工作簿 - 107 技巧 45 关闭工作簿不显示保存对话框 - 111 45-1 使用 Close 方法关闭工作簿 - 111 45-2 单击工作簿关闭按钮关闭工作簿 - 113 技巧 46 禁用工作簿的关闭按钮 - 113 技巧 47 保存工作簿的方法 - 115 47-1 使用 Save 方法 - 115 47-2 直接
9、保存为另一文件名 - 115 47-3 保存工作簿副本 - 115 技巧 48 保存指定工作表为工作簿文件 - 116 技巧 49 打印预览时不触发事件 - 118 技巧 50 设置工作簿文档属性信息 - 120 技巧 51 不打开工作簿取得其他工作簿数据 - 121 51-1 使用公式 - 121 51-2 使用 GetObject 函数 - 122 51-3 隐藏 Application 对象 - 123 51-4 使用 ExecuteExcel4Macro 方法 - 124 51-5 使用 SQL 连接 - 125 技巧 52 返回窗口的可视区域地址 - 126 第 4 章 Shape（
10、图形）、 Chart（图表）对象 - 128 技巧 53 在工作表中添加图形 - 128 技巧 54 导出工作表中的图片 - 133 技巧 55 在工作表中添加艺术字 - 135 技巧 56 遍历工作表中的图形 - 137 技巧 57 移动、旋转图片 - 139 技巧 58 工作表中自动插入图片 - 140 技巧 59 固定工作表中图形的位置 - 143 技巧 60 使用 VBA 自动生成图表 - 145 技巧 61 使用独立窗口显示图表 - 149 VBA 常用技巧 代码解析 4 技巧 62 导出工作表中的图表 - 150 技巧 63 多图表制作 - 151 第 5 章 Applicatio
11、n 对象 - 155 技巧 64 取得 Excel 版本信息 - 155 技巧 65 取得当前用户名称 - 156 技巧 66 Excel 中的“定时器” - 156 技巧 67 设置活动打印机的名称 - 158 技巧 68 屏蔽、改变组合键的功能 - 159 技巧 69 设置 Excel 窗口标题栏 - 160 技巧 70 自定义 Excel 状态栏 - 161 技巧 71 灵活退出 Excel- 162 技巧 72 隐藏 Excel 主窗口 - 163 72-1 设置 Application 对象的 Visible 属性 - 163 72-2 将窗口移出屏幕 - 164 72-3 设置工作
12、簿作为加载宏运行 - 165 第 6 章 使用对话框 - 167 技巧 73 使用 Msgbox 函数 - 167 73-1 显 示简单的提示信息 - 167 73-2 定制个性化的消息框 - 168 73-3 获得消息框的返回值 - 169 73-4 在消息框中排版 - 171 73-5 对齐消息框中显示的信息 - 172 技巧 74 自动关闭的消息框 - 174 74-1 使用 WshShell.Popup 方法显示消息框 - 174 74-2 使用 API 函数显示消息框 - 175 技巧 75 使用 InputBox 函数 - 176 75-1 简单的数据输入 - 176 75-2 使
13、用对话框输 入密码 - 178 技巧 76 使用 InputBox 方法 - 180 76-1 输入指定类型的数据 - 180 76-2 获得单元格区域地址 - 182 技巧 77 内置对话框 - 183 77-1 调用内置的对话框 - 183 77-2 获取选定文件的文件名 - 186 77-3 使用“另存为”对话框 - 188 技巧 78 调用操作系统 “关于 ”对话框 - 190 第 7 章 菜单和工具栏 - 192 技巧 79 在菜单中添加菜单项 - 192 技巧 80 在菜单栏指定位置添加菜单 - 195 技巧 81 屏蔽和删除工作表菜单 - 197 技巧 82 改变系统菜单的操作
14、- 198 技巧 83 定制自己的系统菜单 - 199 技巧 84 改变菜单按钮图标 - 205 技巧 85 右键快捷菜单增加菜单项 - 206 VBA 常用技巧 代码解析 5 技巧 86 自定义右键快捷菜单 - 207 技巧 87 使用右键菜单制作数据有效性 - 210 技巧 88 禁用工作表右键菜单 - 212 技巧 89 创建自定义工具栏 - 213 技巧 90 自定义工具栏按钮图标 - 216 技巧 91 自定义工作簿图标 - 217 技巧 92 移除工作表的最小最大化和关闭按钮 - 218 技巧 93 在工具栏上添加下拉列表框 - 219 技巧 94 屏蔽工作表的复制功能 - 221 技巧 95 禁用工具栏的自定义 - 222 技巧 96 屏蔽所有的命令栏 - 225 技巧 97 恢复 Excel 的命令栏 - 226 第 8 章 控件与用户窗体 - 228 技巧 98 限制文本框的输入 - 228 技巧 99 文本框添加右键 快捷菜单 - 230 技巧 100 文本框回车自动输入 - 234 技巧 101 自动选择文本框内容 - 235 技巧 102 设置文本框数据格式 - 236 技巧 103 限制文本框的输入长度 - 23
