没有合适的资源?快使用搜索试试~ 我知道了~
VBA常用技巧


试读
64页

VBA(Visual Basic for Applications)是Microsoft Office套件中的一种编程语言,允许用户自定义功能,自动化任务,提高工作效率。以下是一些VBA的常用技巧,涵盖了对单元格的操作、区域选择、查找与定位等核心概念。
### 技巧 1: Range(单元格)对象
1-1 **使用 Range 属性**:`Range`属性是VBA中最基本的元素,用于引用工作表中的单元格或单元格区域。例如,`Range("A1")`将选取工作表上的A1单元格。
1-2 **使用 Cells 属性**:`Cells`属性允许通过行索引和列索引选取单元格。例如,`Cells(1, 1)`代表第一行第一列的单元格,即A1。
1-3 **使用快捷记号**:可以使用`$`符号来固定行或列的引用,如`$A$1`表示绝对引用A1单元格。
1-4 **使用 Offset 属性**:`Offset`属性可以偏移指定行数和列数来选取新的单元格。例如,`Range("A1").Offset(1, 0)`选取A2单元格。
1-5 **使用 Resize 属性**:可以改变已选区域的大小,如`Range("A1").Resize(3, 2)`将选取一个3行2列的矩形区域,起始于A1。
1-6 **使用 Union 方法**:将多个不连续的区域合并为一个大范围,如`Union(Range("A1"), Range("B2"))`选取A1和B2两个单元格。
1-7 **使用 UsedRange 属性**:返回工作表上已使用的最大范围,包含所有非空单元格。
1-8 **使用 CurrentRegion 属性**:选取当前单元格周围的连续非空区域。
### 技巧 2: 选定单元格区域的方法
2-1 **使用 Select 方法**:`Select`方法使指定的范围成为活动区域,如`Range("A1").Select`将选取并激活A1单元格。
2-2 **使用 Activate 方法**:`Activate`方法激活指定的单元格,但不将其选中,如`Range("B2").Activate`使B2单元格成为活动单元格。
2-3 **使用 Goto 方法**:`Goto`方法可以快速跳转到指定的位置,如`Range("C3").Select`或`Application.Goto Range("C3")`都可以跳转到C3单元格。
### 技巧 3: 获得指定行、列中的最后一个非空单元格
可以使用`Find`或`FindLastCell`自定义函数来找到指定行或列的最后一个非空单元格。
### 技巧 4: 定位单元格
可以使用`Find`方法配合特定条件来定位满足条件的单元格,如`Set rng = Range("A:A").Find("关键词", LookIn:=xlValues)`在A列中查找“关键词”。
### 技巧 5: 查找单元格
`Find`方法是查找功能的核心,可以设置各种查找参数,如`LookIn`(查找内容类型),`LookAt`(查找匹配方式),`SearchOrder`(查找方向)等。
以上技巧只是VBA庞大知识体系的一部分,实际上VBA还可以处理复杂的逻辑判断、数组操作、用户界面设计、数据库连接等多种任务。学习并熟练运用这些技巧,能够极大地提升Excel和其他Office应用的自动化水平,提高工作效率。

VBA 常用技巧
目录
VBA 常用技巧....................................................................................................................................1
第 1 章 Range(单元格)对象...............................................................................................6
技巧 1 单元格的引用方法...............................................................................................6
1-1 使用 Range 属性..................................................................................................6
1-2 使用 Cells 属性....................................................................................................7
1-3 使用快捷记号.....................................................................................................7
1-4 使用 Offset 属性..................................................................................................8
1-5 使用 Resize 属性.................................................................................................9
1-6 使用 Union 方法................................................................................................10
1-7 使用 UsedRange 属性.......................................................................................10
1-8 使用 CurrentRegion 属性..................................................................................11
技巧 2 选定单元格区域的方法.....................................................................................11
2-1 使用 Select 方法................................................................................................11
2-2 使用 Activate 方法............................................................................................12
2-3 使用 Goto 方法..................................................................................................13
技巧 3 获得指定行、列中的最后一个非空单元格.....................................................13
技巧 4 定位单元格.........................................................................................................16
技巧 5 查找单元格.........................................................................................................17
5-1 使用 Find 方法...................................................................................................17
5-2 使用 Like 运算符..............................................................................................21
技巧 6 替换单元格内字符串.........................................................................................22
技巧 7 复制单元格区域.................................................................................................23
技巧 8 仅复制数值到另一区域.....................................................................................26
8-1 使用选择性粘贴...............................................................................................26
8-2 直接赋值的方法...............................................................................................27
技巧 9 单元格自动进入编辑状态.................................................................................28
技巧 10 禁用单元格拖放功能.......................................................................................28
技巧 11 单元格格式操作...............................................................................................30
11-1 单元格字体格式设置.....................................................................................30
11-2 设置单元格内部格式.....................................................................................31
11-3 为单元格区域添加边框.................................................................................32
11-4 灵活设置单元格的行高列宽.........................................................................34
技巧 12 单元格中的数据有效性...................................................................................36
12-1 在单元格中建立数据有效性.........................................................................36
12-2 判断单元格是否存在数据有效性.................................................................37
12-3 动态的数据有效性.........................................................................................37
12-4 自动展开数据有效性下拉列表.....................................................................39
技巧 13 单元格中的公式...............................................................................................40
13-1 在单元格中写入公式.....................................................................................41
13-2 检查单元格是否含有公式.............................................................................41
1

13-3 判断单元格公式是否存在错误.....................................................................42
13-4 取得单元格中公式的引用单元格.................................................................43
13-5 将单元格中的公式转换为数值.....................................................................44
技巧 14 单元格中的批注...............................................................................................45
14-1 判断单元格是否存在批注.............................................................................45
14-2 为单元格添加批注.........................................................................................46
14-3 删除单元格中的批注.....................................................................................47
技巧 15 合并单元格操作...............................................................................................48
15-1 判断单元格区域是否存在合并单元格.........................................................48
15-2 合并单元格时连接每个单元格的文本.........................................................49
15-3 合并内容相同的连续单元格.........................................................................50
15-4 取消合并单元格时在每个单元格中保留内容.............................................52
技巧 16 高亮显示单元格区域.......................................................................................53
技巧 17 双击被保护单元格时不显示提示消息框.......................................................55
技巧 18 重新计算工作表指定区域...............................................................................56
技巧 19 录入数据后单元格自动保护...........................................................................57
技巧 20 工作表事件 Target 参数的使用方法...............................................................58
20-1 使用单元格的 Address 属性..........................................................................58
20-2 使用 Column 属性和 Row 属性......................................................................59
20-3 使用 Intersect 方法..........................................................................................59
第 2 章 Worksheet(工作表)对象......................................................................................61
技巧 21 引用工作表的方式...........................................................................................61
21-1 使用工作表的名称.........................................................................................61
21-2 使用工作表的索引号.....................................................................................61
21-3 使用工作表的代码名称.................................................................................62
21-4 使用 ActiveSheet 属性引用活动工作表........................................................62
技巧 22 选择工作表的方法...........................................................................................63
技巧 23 遍历工作表的方法...........................................................................................64
23-1 使用 For...Next 语句.......................................................................................65
23-2 使用 For Each...Next 语句..............................................................................66
技巧 24 在工作表中上下翻页.......................................................................................67
技巧 25 工作表的添加与删除.......................................................................................68
技巧 26 禁止删除指定工作表.......................................................................................72
技巧 27 自动建立工作表目录.......................................................................................74
技巧 28 工作表的深度隐藏...........................................................................................76
技巧 29 防止更改工作表的名称...................................................................................78
技巧 30 工作表中一次插入多行...................................................................................79
技巧 31 删除工作表中的空行.......................................................................................81
技巧 32 删除工作表的重复行.......................................................................................82
技巧 33 定位删除特定内容所在的行...........................................................................84
技巧 34 判断是否选中整行...........................................................................................85
技巧 35 限制工作表的滚动区域...................................................................................86
技巧 36 复制自动筛选后的数据区域...........................................................................88
技巧 37 使用高级筛选获得不重复记录.......................................................................89
2

技巧 38 工作表的保护与解除保护...............................................................................91
技巧 39 奇偶页打印.......................................................................................................93
第 3 章 Wordbook(工作簿)对象.......................................................................................95
技巧 40 工作簿的引用方法...........................................................................................95
40-1 使用工作簿的名称.........................................................................................95
40-2 使用工作簿的索引号.....................................................................................95
40-3 使用 ThisWorkbook.........................................................................................96
40-4 使用 ActiveWorkbook.....................................................................................97
技巧 41 新建工作簿文件...............................................................................................97
技巧 42 打开指定的工作簿...........................................................................................99
技巧 43 判断指定工作簿是否打开.............................................................................102
43-1 遍历 Workbooks 集合方法...........................................................................102
43-2 错误处理方法...............................................................................................103
技巧 44 禁用宏则关闭工作簿.....................................................................................104
技巧 45 关闭工作簿不显示保存对话框.....................................................................107
45-1 使用 Close 方法关闭工作簿........................................................................107
45-2 单击工作簿关闭按钮关闭工作簿...............................................................109
技巧 46 禁用工作簿的关闭按钮.................................................................................109
技巧 47 保存工作簿的方法.........................................................................................111
47-1 使用 Save 方法..............................................................................................111
47-2 直接保存为另一文件名................................................................................111
47-3 保存工作簿副本............................................................................................112
技巧 48 保存指定工作表为工作簿文件.....................................................................112
技巧 49 打印预览时不触发事件.................................................................................114
技巧 50 设置工作簿文档属性信息.............................................................................116
技巧 51 不打开工作簿取得其他工作簿数据.............................................................117
51-1 使用公式........................................................................................................117
51-2 使用 GetObject 函数.....................................................................................118
51-3 隐藏 Application 对象...................................................................................119
51-4 使用 ExecuteExcel4Macro 方法...................................................................120
51-5 使用 SQL 连接..............................................................................................121
技巧 52 返回窗口的可视区域地址.............................................................................123
第 4 章 Shape(图形)、Chart(图表)对象...................................................................125
技巧 53 在工作表中添加图形.....................................................................................125
技巧 54 导出工作表中的图片.....................................................................................130
技巧 55 在工作表中添加艺术字.................................................................................132
技巧 56 遍历工作表中的图形.....................................................................................134
技巧 57 移动、旋转图片.............................................................................................136
技巧 58 工作表中自动插入图片.................................................................................138
技巧 59 固定工作表中图形的位置.............................................................................140
技巧 60 使用 VBA 自动生成图表...............................................................................142
技巧 61 使用独立窗口显示图表.................................................................................146
技巧 62 导出工作表中的图表.....................................................................................147
技巧 63 多图表制作.....................................................................................................148
3

第 5 章 Application 对象......................................................................................................152
技巧 64 取得 Excel 版本信息......................................................................................152
技巧 65 取得当前用户名称.........................................................................................153
技巧 66 Excel 中的“定时器”........................................................................................153
技巧 67 设置活动打印机的名称.................................................................................155
技巧 68 屏蔽、改变组合键的功能.............................................................................156
技巧 69 设置 Excel 窗口标题栏..................................................................................157
技巧 70 自定义 Excel 状态栏......................................................................................159
技巧 71 灵活退出 Excel...............................................................................................159
技巧 72 隐藏 Excel 主窗口..........................................................................................160
72-1 设置 Application 对象的 Visible 属性..........................................................160
72-2 将窗口移出屏幕...........................................................................................161
72-3 设置工作簿作为加载宏运行.......................................................................163
第 6 章 使用对话框..............................................................................................................165
技巧 73 使用 Msgbox 函数..........................................................................................165
73-1 显示简单的提示信息...................................................................................165
73-2 定制个性化的消息框...................................................................................166
73-3 获得消息框的返回值...................................................................................167
73-4 在消息框中排版...........................................................................................169
73-5 对齐消息框中显示的信息...........................................................................170
技巧 74 自动关闭的消息框.........................................................................................172
74-1 使用 WshShell.Popup 方法显示消息框.......................................................172
74-2 使用 API 函数显示消息框...........................................................................173
技巧 75 使用 InputBox 函数........................................................................................174
75-1 简单的数据输入...........................................................................................174
75-2 使用对话框输入密码...................................................................................176
技巧 76 使用 InputBox 方法........................................................................................178
76-1 输入指定类型的数据...................................................................................178
76-2 获得单元格区域地址...................................................................................180
技巧 77 内置对话框.....................................................................................................181
77-1 调用内置的对话框.......................................................................................182
77-2 获取选定文件的文件名...............................................................................184
77-3 使用“另存为”对话框.....................................................................................186
技巧 78 调用操作系统“关于”对话框..........................................................................188
第 7 章 菜单和工具栏..........................................................................................................190
技巧 79 在菜单中添加菜单项.....................................................................................190
技巧 80 在菜单栏指定位置添加菜单.........................................................................193
技巧 81 屏蔽和删除工作表菜单.................................................................................195
技巧 82 改变系统菜单的操作.....................................................................................196
技巧 83 定制自己的系统菜单.....................................................................................197
技巧 84 改变菜单按钮图标.........................................................................................203
技巧 85 右键快捷菜单增加菜单项.............................................................................204
技巧 86 自定义右键快捷菜单.....................................................................................205
技巧 87 使用右键菜单制作数据有效性.....................................................................208
4

技巧 88 禁用工作表右键菜单.....................................................................................210
技巧 89 创建自定义工具栏.........................................................................................211
技巧 90 自定义工具栏按钮图标.................................................................................214
技巧 91 自定义工作簿图标.........................................................................................216
技巧 92 移除工作表的最小最大化和关闭按钮.........................................................217
技巧 93 在工具栏上添加下拉列表框.........................................................................218
技巧 94 屏蔽工作表的复制功能.................................................................................220
技巧 95 禁用工具栏的自定义.....................................................................................221
技巧 96 屏蔽所有的命令栏.........................................................................................224
技巧 97 恢复 Excel 的命令栏......................................................................................226
5
剩余63页未读,继续阅读
资源推荐
资源评论
164 浏览量
190 浏览量
2016-07-31 上传

184 浏览量
2010-05-26 上传
196 浏览量

2011-05-28 上传
166 浏览量

188 浏览量

135 浏览量
资源评论

- wxiao42018-07-17只有一半 不全

D_Phoenix
- 粉丝: 0
- 资源: 1
上传资源 快速赚钱
我的内容管理 展开
我的资源 快来上传第一个资源
我的收益
登录查看自己的收益我的积分 登录查看自己的积分
我的C币 登录后查看C币余额
我的收藏
我的下载
下载帮助


最新资源
- Bisecting K-Means在RAG中的应用以提升电信领域问答任务的性能
- 两阶段控制框架下的多能源微网协同自主优化仿真研究:基于MATLAB平台的多时间尺度滚动优化策略实现,基于两阶段控制框架的多能源微网协同自主优化调度系统MATLAB实现,MATLAB程序:基于两阶段控制
- 基于多目标粒子群算法的冷热电联供综合能源系统优化运行策略:涉及燃气轮机、锅炉与电制冷机的混合储能技术应用,冷热电联供型综合能源系统基于多目标粒子群算法的运行优化及混合储能技术应用,基于多目标粒子群算法
- 基于宜信开源项目Davinci的Visualis数据可视化BI工具设计源码
- DSP平台下的PMSM电阻电感磁链参数精准辨识工程:高效辩识方法与源代码详解,DSP平台下的PMSM电阻电感磁链参数精准辨识工程:高效辩识方法与源代码详解,PMSM电阻电感磁链参数辩识 dsp平台的p
- 矢量控制入门指南:从零开始学写FOC代码,清晰严谨的程序结构,配套实验与上位机功能实现,**矢量控制入门:自主编写FOC程序,全方位指导,配套实验与上位机调整功能**,矢量控制入门 如果你买了一堆学习
- Cy-IP地址管理助手
- 博途PLC程序下的溢流水循环系统的设计与应用:西门子触摸屏TP1200与软件v15.1实践指南,博途PLC溢流水循环系统的实现:西门子触摸屏TP1200下的成熟可靠程序V15.1参考案例,溢流水巡环系
- 遗传算法优化的BP神经网络预测代码详解:清晰注释,易于上手,MATLAB程序实现,遗传算法优化的BP神经网络预测MATLAB代码,清晰注释,换数据即运行,简单易懂且效果显著,遗传算法优化的BP神经网络
- 西门子双相机四轴多工位检测设备技术解析:KTP700触摸屏编程指南与博图V15应用实战体验,西门子电气双相机多轴及KTP触摸屏自动化设备程序设计与实践分享:探究上下双工位四轴步进电机的控制与实践 ,西
- 西门子PLC 1200与威纶通博图V15:多工位联动控制与上位机通讯实现解析 - 含Modbus485与伺服控制步进电机及变频器实例分享,西门子PLC 1200与威纶通实例解析:步进电机控制、Mo
- 西门子PLC S7-1200编程实例:涉及安川机器人TCP/IP通信、伺服电机控制、开放式通讯交互与传感器数据读取(博图V15版本),西门子PLC S7-1200博图版V15程序实例详解:TCP IP
- 基于S7-300和组态王的污水处理厂沉淀池至V型滤池控制系统的设计与实现:梯形图程序、接线图与组态画面全解析,基于S7-300与组态王的污水处理厂沉淀池-V型滤池控制:梯形图程序详解、接线图与IO配置
- 基于组态王技术的锅炉控制系统研究与仿真控制策略分析,基于组态王软件的锅炉控制系统仿真研究及优化,基于组态王组态锅炉控制系统研究与仿真控制 ,基于组态王; 组态锅炉; 控制系统; 仿真控制; 研究,基
- 基于Java_SpringBoot的影院售票管理系统设计源码
- 《四层三列书架式立体库控制系统的设计与实现:带梯形图接线图原理图的IO分配与组态画面》,四层三列堆垛式立体库控制系统:带解释的梯形图接线原理图与IO分配及组态画面详解,4x3堆垛式立体库4层3列四层三
安全验证
文档复制为VIP权益,开通VIP直接复制
