VBA中OFFSET函数的实际利用

今日继续讲VBA实用代码的第十讲，相信大家通过这系列的文章学到了很多，今日着重讲解OFFSET函数在VBA中的利用。

1 Range("A32", Range("A32").End(xlUp)).Select

Range(ActiveCell, ActiveCell.End(xlUp)).Select

语句说明：执行上述代码后选择当前活动单元格向上至第一个非空单元格：

备注：ActiveCell是指当前活动单元格。

2 Range("A1", Range("A1").End(xltoRight)).Select

Range(ActiveCell, ActiveCell.End(xltoLeft)).Select

语句说明：执行上述代码后选择当前活动单元格向右至第一个非空单元格。

备注：是 "xlTORight"而不是 "xlRight"

3 Range("A2", Range("A2").Offset(0, 10)).Select

Range(ActiveCell, ActiveCell.Offset(0, 10)).Select

语句说明：执行上述代码后选择当前活动单元格向右至第10个单元格。

备注: OFFSET函数的意义与EXCEL函数中的意义有所不同。可以把他看做一个单元格的属性，即Range.Offset 属性。返回 Range 对象，它代表位于指定单元格区域的一定的偏移量位置上的区域。

表达式：Offset(RowOffset, ColumnOffset)

其中参数：RowOffset, ColumnOffset代表偏移行，列。数字可以是正数，负数，零值

RowOffset 可选 Variant 区域偏移的行数（正数、负数或0（零））。正数表示向下偏移，负数表示向上偏移。默认值是 0。

ColumnOffset 可选 Variant 区域偏移的列数（正数、负数或0（零））。正数表示向右偏移，负数表示向左偏移。默认值是 0。

4 Range("A20", Range("A20").Offset(0, -10)).Select

Range(ActiveCell, ActiveCell.Offset(0, -10)).Select

语句说明：执行上述代码后选择当前活动单元格向左至第10个单元格。

备注：ColumnOffset 代表 Variant 区域偏移的列数，负数表示向左偏移。

5 Range("a2", Range("a2").Offset(10, 0)).Select

Range(ActiveCell, ActiveCell.Offset(10, 0)).Select

语句说明：执行上述代码后，选择当前活动单元格向下至第10个单元格。

备注：RowOffset 代表Variant 区域偏移的行数，正数表示向下偏移，负数表示向上偏移。默认值是 0。

6 Range("A1").End(xlDown).Offset(1, 0).Select

语句说明：执行上述代码后，选择该行中第一个空单元格

备注：End(xlDown)是指向下移动

7 Range("A1").End(xltoRight).Offset(0,1).Select

语句说明：执行上述代码后，选择该列中第一个空单元格：

备注：End(xltoRight)是向右移动。

8 ActiveCell.Offset(0, -ActiveCell.Column + 1).Select

语句说明：执行上述代码后，移至当前行的第一个单元格的动作（即你按下“Home”键的动作）

ActiveCell.Offset( -ActiveCell.Row + 1,0).Select

语句说明：执行上述代码后，移至当前列的第一个单元格:

备注:充分利用OFFSET函数，实现单元格的选择。

看下面的代码:

运行：

9 ActiveCell.Offset(13, 14).Select

Selection.Offset(-3, -4).Select

语句说明：执行上述代码后，单元格间移动。

备注：你可以定义一变量，并且用offset来实现，

例如：varFreightRowsCount = Range("A1").CurrentRegion.Rows.Count

ActiveCell.Offset(varFreightRowsCount, 0).Select

今日内容回向：

1 OFFSET函数在VBA和EXCEL中有什么不同？

2 OFFSET函数在VBA中有哪些精彩利用

我从事管理工作多年，这一系列文章是根据多年的经验编写的，也是一直在利用的工具，非常方便好用。现在分享出来，希望能对同样在职场打拼的朋友有些许的帮助。

我的公众号“NZ_9668”和“VBA学习交流社群”里有更多的内容分享。对数据分析有需要的公司、组织或个人可以直接联系我，为你提供专业的技术支持。朋友们有问题请随时提出来，我们一起探讨学习。目的是能更好地利用Excel和VBA，提高工作效率，能有更多的时间和精力享受生活。