没有合适的资源?快使用搜索试试~ 我知道了~
首页VBA实用技巧大全:单元格操作、公式与格式
VBA实用技巧大全:单元格操作、公式与格式
需积分: 13 6 下载量 196 浏览量
更新于2024-07-17
1
收藏 18.07MB DOC 举报
"VBA常用技巧文档详细介绍了Excel VBA编程中的一系列实用技巧,涵盖了多个关键主题。主要内容包括: 1. Range对象操作:讲解了如何通过`Range`属性、`Cells`属性、快捷记号、`Offset`和`Resize`属性、`Union`方法、`UsedRange`和`CurrentRegion`属性来管理和操作单元格。 2. 选定单元格区域:阐述了`Select`、`Activate`和`Goto`方法的不同用途,以便精确地定位和选择需要操作的单元格。 3. 单元格定位与查找:涉及`Find`方法和`Like`运算符的应用,用于查找特定内容或符合特定模式的单元格。 4. 单元格操作:包括替换字符串、复制单元格、只复制数值、单元格编辑状态控制和禁用拖放功能等实用技巧。 5. 格式设置:详细说明了字体格式、内部格式、边框添加、行高列宽调整以及单元格数据的有效性和公式处理,如数据有效性、公式检查和转换等。 6. 注释管理:涵盖了如何查看、添加和删除单元格批注的功能。 7. 合并单元格:讲解了合并单元格的方法,包括判断合并、合并文本连接、连续单元格合并及取消合并后的内容保留。 8. 高亮显示:介绍如何使用VBA高亮显示特定的单元格区域。 9. 特殊场景处理:例如,避免双击受保护单元格时弹出提示,以及重新计算指定工作表区域。 10. 数据安全:提供了录入数据后自动保护单元格和利用工作表事件`Target`参数的使用方法。 这些技巧不仅有助于提升Excel VBA编程的效率,还能帮助用户深入理解和掌握Excel的工作流程,是Excel高级用户和开发者必备的技能库。"
资源详情
资源推荐
![](https://csdnimg.cn/release/download_crawler_static/11190331/bgb.jpg)
VBA 常用技巧代码解析
#001 Sub Fastmark()
#002 [A1:A5] = 2
#003 [Fast] = 4
#004 End Sub
代码解析:
Fastmark 过程使用快捷记号为单元格区域赋值。
第 2 行代码使用快捷记号将活动工作表中的 A1:A5 单元格赋值为 2。
第 3 行代码将工作簿中已命名为“Fast”的单元格区域赋值为 4。
注意 使用快捷记号引用单元格区域时只能使用固定字符串而不能使用变量。
1-4 使用 Offset 属性
可以使用 Range 对象的 Offset 属性返回一个基于引用的 Range 对象的单元格区域,
如下面的代码所示。
#001 Sub Offset()
#002 Sheet3.Range("A1:C3").Offset(3, 3).Select
#003 End Sub
代码解析:
Offset 过程使用 Range 对象的 Offset 属性选中 A1:A3 单元格偏移三行三列后的区域。
应用于 Range 对象的 Offset 属性的语法如下:
expression.Offset(RowOffset, ColumnOffset)
参数 expression 是必需的,该表达式返回一个 Range 对象。
参数 RowOffset 是可选的,区域偏移的行数(正值、负值或 0(零))。正值表示向
下偏移,负值表示向上偏移,默认值为 0。
参数 ColumnOffset 是可选的,区域偏移的列数(正值、负值或 0(零))。正值表示
向右偏移,负值表示向左偏移,默认值为 0。
运行 Offset 过程,选中 A1:A3 单元格偏称三行三列后的区域,如图 1 -2 所示。
11
![](https://csdnimg.cn/release/download_crawler_static/11190331/bgc.jpg)
VBA 常用技巧代码解析
图 1-2 使用 Range 对象的 Offset 属性
1-5 使用 Resize 属性
使用 Range 对象的 Resize 属性调整指定区域的大小,并返回调整大小后的单元格区
域,如下面的代码所示。
#001 Sub Resize()
#002 Sheet4.Range("A1").Resize(3, 3).Select
#003 End Sub
代码解析:
Resize 过程使用 Range 对象的 Resize 属性选中 A1 单元格扩展为三行三列后的区域。
Resize 属性的语法如下:
expression.Resize(RowSize, ColumnSize)
参数 expression 是必需的,返回要调整大小的 Range 对象
参数 RowSize 是可选的,新区域中的行数。如果省略该参数,则该区域中的行数保持
不变。
参数 ColumnSize 是可选的,新区域中的列数。如果省略该参数。则该区域中的列数
保持不变。
运行 Resize 过程,选中 A1 单元格扩展为三行三列后的区域,如图 1 -3 所示。
图 1-3 使用 Resize 属性调整区域大小
12
![](https://csdnimg.cn/release/download_crawler_static/11190331/bgd.jpg)
VBA 常用技巧代码解析
1-6 使用 Union 方法
使用 Union 方法可以将多个非连续区域连接起来成为一个区域,从而可以实现对多个
非连续区域一起进行操作,如下面的代码所示。
#001 Sub UnSelect()
#002 Union(Sheet5.Range("A1:D4"), Sheet5.Range("E5:H8")).Select
#003 End Sub
代码解析:
UnSelect 过程选择单元格 A1:D4 和 E5:H8 所组成的区域。Union 方法返回两个或多个
区域的合并区域,语法如下:
expression.Union(Arg1, Arg2, ...)
其中参数 expression 是可选的,返回一个 Application 对象。
参数 Arg1, Arg2, ...是必需的,至少指定两个 Range 对象。
运行 UnSelect 过程,选中单元格 A1:D4 和 E5:H8 所组成的区域,如图 1 -4 所示。
图 1-4 使用 Union 方法将多个非连续区域连接成一个区域
1-7 使用 UsedRange 属性
使用 UsedRange 属性返回指定工作表上已使用单元格组成的区域,如下面的代码所
示。
#001 Sub UseSelect()
#002 Sheet6.UsedRange.Select
#003 End Su
代码解析:
UseSelect 过程使用 UsedRange 属性选择工作表上已使用单元格组成的区域,包括空
单元格。如工作表中已使用 A1 单元格和 D8 单元格,运行 UseSelect 过程将选择 A1 到 D8
单元格区域,如图 1 -5 所示。
13
剩余63页未读,继续阅读
![application/x-rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://profile-avatar.csdnimg.cn/5b91688d51814728b6a7a5e19f25a4a7_weixin_42676727.jpg!1)
weixin_42676727
- 粉丝: 13
- 资源: 7
上传资源 快速赚钱
我的内容管理 展开
我的资源 快来上传第一个资源
我的收益
登录查看自己的收益我的积分 登录查看自己的积分
我的C币 登录后查看C币余额
我的收藏
我的下载
下载帮助
![](https://csdnimg.cn/release/wenkucmsfe/public/img/voice.245cc511.png)
最新资源
- 贵州煤矿矿井水分类与处理策略:悬浮物、酸性与非酸性
- 醛固酮增多症肾上腺静脉采样对比:ACTH后LR-CAV的最优评估
- 开源云连接传感器监控平台:农业土壤湿度远程监测
- 母婴用品企业年度生产计划线性规划优化模型:实证与应用
- 井下智能变电站:Rogowski线圈电流检测系统的研发与性能验证
- 霍州矿区煤巷稳定性分析及支护策略
- ARM嵌入式系统远程软件更新方案:基于TFTP协议
- 煤炭选煤中汞分布规律与洗选脱汞效果
- 提升码垛机器人性能:拉格朗日动力学模型与滑模模糊控制的应用
- 增强现实技术提升学前手写教学:设计与开发案例
- 不规则工作面沉陷三角剖分算法提升与应用
- 卡尔曼滤波在瞬变电磁干扰压制中的应用研究
- 煤矿安全能力研究:理论与系统构建
- LonWorks总线技术在斜巷运输车辆定位与跑车防护中的应用
- 神东煤炭集团高效煤粉锅炉系统:节能环保新实践
- Ti/SnO2+Sb2Ox/PbO2电极分形维数与电催化性能研究
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
![](https://img-home.csdnimg.cn/images/20220527035711.png)
![](https://img-home.csdnimg.cn/images/20220527035711.png)
![](https://img-home.csdnimg.cn/images/20220527035111.png)
安全验证
文档复制为VIP权益,开通VIP直接复制
![](https://csdnimg.cn/release/wenkucmsfe/public/img/green-success.6a4acb44.png)