蓝字关注,加微信NZ9668获资料信息
VBA解决方案 系列丛书作者
头条百家平台 VBA资深创作者
_______________________________
大家好,今日继续和大家分享VBA
编程中常用的常用“积木”过程代码。这些内容大多是我的经验的记录,来源于我多年的经验。今日分享的是NO.227-NO.228
,内容是:NO. 227
:在工作表的SelectionChange
事件中当返回的区域引用是“A1
”时触发SelectionChange
事件NO. 228
:Target.Address(0, 0)
属性的意义
![6681b27131b95cafa95a93d732b5e666.png](https://img-blog.csdnimg.cn/img_convert/6681b27131b95cafa95a93d732b5e666.png)
VBA
过程代码
227
:在工作表的
SelectionChange
事件中当返回的区域引用是“
A1
”时触发
SelectionChange
事件Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address(0, 0) ="A1" Then MsgBox "
你好,你选种了A1
单元格" End IfEnd Sub
代码解析:在工作表的SelectionChange
事件中,参数Target
代表新选定的区域。在实际应用中可以根据Target
参数将触发工作表事件的区域限制在一定的范围内,使用Address
属性返回所选单元格的区域引用,当返回的区域引用是“A1
”时触发SelectionChange
事件,显示一个消息框"
你好,你选种了A1
单元格"
。
![c6f1b45adc969cb7be777718ec7bc32e.png](https://img-blog.csdnimg.cn/img_convert/c6f1b45adc969cb7be777718ec7bc32e.png)
VBA
过程代码
228
:
Target.Address(0, 0)
属性的意义Private Sub Worksheet_SelectionChange(ByVal Target As Range) MsgBox"Target.Address: " & Target.Address & Chr(13) _ &"Target.Address(0,0): " & Target.Address(0, 0) End Sub
代码解析:当我点击“H7
”时Target.Address =$h$7
而 Target.Address(0, 0) =
“H7
”一个是相对引用,一个是绝对引用。
对于一个单元格的Address
属性,
我再做下面的讲解:Expression.Address(RowAbsolute
,ColumnAbsolute
,ReferenceStyle
,External
,RelativeTo)
其中:a) Expression
一个表示 Range
对象的变量。b) RowAbsolute
可选 Variant
如果为 True
,则以绝对引用返回引用的行部分。默认值为 True
。c) ColumnAbsolute
可选 Variant
如果为 True
,则以绝对引用返回引用的列部分。默认值为 True
。d) ReferenceStyle
可选 XlReferenceStyle
引用样式。
默认值为 xlA1
。e) External
可选 Variant
如果为 True
,则返回外部引用。如果为False
,则返回本地引用。默认值为 False
。f) RelativeTo
可选 Variant
如果 RowAbsolute
和ColumnAbsolute
为 False
,并且 ReferenceStyle
为 xlR1C1
,则必须包括相对引用的起始点。此参数是定义起始点的 Range
对象。VBA
是利用OFFICE
实现自己小型办公自动化的有效手段,我根据自己20
多年的VBA
实际利用经验,总结了四部VBA
学习资料,是我“积木编程”思想的体现。
![4d38161a4736a412da2b68fa6f3d7696.png](https://img-blog.csdnimg.cn/img_convert/4d38161a4736a412da2b68fa6f3d7696.png)
第一:VBA
代码解决方案,是VBA
中各个知识点的讲解,覆盖了绝大多数的知识点;
第二:VBA
数据库解决方案,是数据处理的专业利器,介绍利用ADO
连接ACCDB,EXCEL
。
第三:VBA
数组与字典解决方案,讲解VBA
中的数组和字典的利用。
第四:VBA
代码解决方案之视频,是专门面向初学者的视频讲解,可以快速入门,更快的掌握这门技能。VBA
真的非常实用,希望大家掌握这个工具,利用这个工具,让自己在工作中轻松,高效,快乐。
_____________________________
有启发 点在看,转给朋友
约作者 请留言,直接交流
更多关联阅读
![cac4a27587a654a77ac7c9150ba2fb64.png](https://img-blog.csdnimg.cn/img_convert/cac4a27587a654a77ac7c9150ba2fb64.png)
![700914de5ed84b51189091fcdd99c26b.png](https://img-blog.csdnimg.cn/img_convert/700914de5ed84b51189091fcdd99c26b.png)
![2073a1998ec85aabf8a19167d1dadb36.png](https://img-blog.csdnimg.cn/img_convert/2073a1998ec85aabf8a19167d1dadb36.png)
![2fbc4ca0ad21ea59b4076e39172aa06c.png](https://img-blog.csdnimg.cn/img_convert/2fbc4ca0ad21ea59b4076e39172aa06c.png)