分享成果,用正能量给职场的年轻人:你的工作是把土地夷为平地,而不是焦虑的时间。你在三月和四月做你所做的事情,在八月和九月你有自己的答案。尝试提高自己!
VBA代码解决方案教程是我的第一个教程,现在是第二个修订版。这套教程定位是要改进之后的介绍,在学习这套教程的过程中,重点是理解和掌握我的"构建块编程"思路。灵活地使用教程中的示例(如构建基块),以将您喜欢的代码放在适当的位置。
这套三卷,147讲,内容范围广泛,而且介于主、中、多教程之间,修改后的内容主要是提供者源文件和代码更正为32位和64位代码。今后一段时间会陆续介绍给大家。今天的内容是第五讲:偏移函数的使用
<在 VBA 中使用 OFFSET 函数>> h1 类中的第五个。pgc-h-right-arrow"</h1>
今天继续讲VBA的实用代码的第五篇,相信大家通过这个系列的文章学到了很多东西,今天重点介绍 OFFSET 函数在 VBA 中的使用。
< h1 类"pgc-h-arrow-right"> 1 个活动单元上下移动</h1>
1) 范围("A32", 范围("A32")。结束(xlUp))。选择
Range(ActiveCell, ActiveCell.End(xlUp)).选择
语句描述:执行上述代码后,选择当前活动单元格,直到第一个非空单元格。
注意:ActiveCell 是指当前的活动单元格。
2) 范围("A1", 范围("A1")。结束(xltoRight))。选择
Range(ActiveCell, ActiveCell.End(xltoLeft)).选择
语句描述:执行上述代码后,选择第一个非空单元格右侧的当前活动单元格。
注意:它是"xlTORight"而不是"xlRight"
< h1 类"pgc-h-right-arrow" >2 使用 OFFSET 函数移动单元格</h1>
3) 范围("A2", 范围("A2")。偏移量(0, 10))。选择
Range(ActiveCell, ActiveCell.Offset(0, 10)).选择
语句描述:执行上述代码后,选择第 10 个单元格右侧的当前活动单元格。
注意:OFFSET 函数可以将他视为单元格属性,即 Range.Offset 属性。返回 Range 对象,该对象表示指定单元格区域中某个偏移位置的区域。
表达式:偏移量(行关闭集、列关闭集)
其中参数为:RowOffset,ColumnOffset代表偏移行,列。数字可以是正数、负数和零数
行参数可选 行数(正、负或 0(零))按区域偏移。正数表示向下偏移,负数表示向上偏移。默认值为 0。
列关闭设置可选 范围偏移的列数(正、负或 0(零))。正数表示向右偏移,负数表示向左偏移。默认值为 0。
4) 范围("A20", 范围("A20")。偏移量(0, -10))。选择
Range(ActiveCell, ActiveCell.Offset(0, -10)).选择
语句描述:执行上述代码后,选择当前活动单元格,左侧到第10个单元格。
注: 列关闭集表示按区域偏移的列数,负数表示向左偏移的列数。
5) 范围("a2", 范围("a2")。偏移量(10, 0))。选择
Range(ActiveCell, ActiveCell.Offset(10, 0)).选择
语句描述:执行上述代码后,选择当前活动单元格,直到第 10 个单元格。
注: RowOffset 表示按区域偏移的行数,其中正数表示向下偏移,负数表示向上偏移。默认值为 0。
6) 范围("A1")。结束(xl向下)。偏移量(1, 0)。选择
语句描述:执行上述代码后,选择列中的第一个空单元格(A1不为空)
注意:结束 (xl 向下) 是指向下移动
7) 范围("A1")。结束(xltoRight)。偏移量(0,1)。选择
语句说明:执行上述代码后,选择行中的第一个空单元格(A1不为空):
注: 结尾 (xltoRight) 向右移动。
8) ActiveCell.Offset(0, -ActiveCell.Column + 1)。选择
语句说明:执行上述代码后,移动到当前行的第一个单元格(即按"Home"键的操作)
ActiveCell.Offset( -ActiveCell.Row + 1,0).选择
语句说明:执行上述代码后,移动到当前列的第一个单元格。
注: 充分利用 OFFSET 函数来实现单元格选择。
9) ActiveCell.Offset(13, 14).选择
选择偏移量(-3, -4)。选择
语句描述:执行上述代码后,单元格选择被移动。
注意:您可以定义一个变量并使用偏移来实现它,
例如:varFreightRowsCount . . .范围("A1")。当前区域.行.计数
ActiveCell.Offset(varFreightRowsCount, 0).选择
这是关于应用的测试代码:
关于 VBA 中 OFFSET 函数实际使用的子mynz_5() '5
床单("5")。选择
'1)
范围("e4")。选择
'2)
Range(ActiveCell, ActiveCell.End(xlToLeft)).选择
'3)
Range(ActiveCell, ActiveCell.Offset(0, 3)).选择
'4)
Range(ActiveCell, ActiveCell.Offset(0, -3)).选择
'5)
Range(ActiveCell, ActiveCell.Offset(3, 0)).选择
'6)
范围("A1")。结束(xl向下)。偏移量(1, 0)。选择
'7)
范围("A1")。结束(xlToRight)。偏移量(0, 1)。选择
'8)
ActiveCell.offset(0, -ActiveCell.Column + 1).选择
'9)
范围("a1")。选择
ActiveCell.Offset(13, 14).选择
结束子
代码截图:
今天的内容返回:
1 偏移函数在 VBA 中是什么意思?
2 偏移函数在 VBA 中有什么用途?
我20多年的VBA经验都浓缩在以下教程中:
第 7 个教程(三卷):"VBA 的 EXCEL 应用":VBA 的基本说明
第 1 个教程(三卷):VBA 代码解决方案:入门级改进教程
第四教程(16G):VBA代码解决方案视频(第一组视频)
第 3 个教程(两卷):VBA 数组和字典解决方案:有关数组和字典的演示
第二个教程(两卷):VBA 数据库解决方案:数据库演示
第 6 个教程(两卷):VBA 信息获取和处理:解释 VBA 的网络和跨程序应用程序
第五个教程(两卷):VBA中类的解释和利用:类和接口技术的解释
第 8 个教程(三卷):VBA Word 应用程序(最新教程):VBA 在单词利用率中的应用
上述教程的顺序:
(1) 7→1→3→ 2→ 6→ 5 或 7→4→ 3→2→6→5.
(2) 7→8
如何学习 VBA?简而言之:"在学习相信的过程中,要解决、接受、持有,还要有回过业力。无论你学习的哪个阶段,通过将你的知识点与你自己的实际工作进行比较,你总会得到很多钱。