如何通过VBA代码来滚动Excel的窗口

来源：本站整理作者：梦在深巷时间：2013-04-07 12:21:37

①滚动行

Worksheets("Sheet1").Activate

ActiveWindow.ScrollRow = 14

代码解释：上述代码的功能是，先激活Sheet1，将其作为活动工作表，然后，自动拖动垂直滚动条，将第14行拖到第一行的位置，即第一行至第13行将被拖到窗口中的上面，并看不到，而第14行则显示在可视窗口的最上面(在可视范围的第一行位置)。

与之相关的知识：

在Excel中，ScrollRow 属性的功能为返回或设置指定窗格或窗口最上面的行号。Long 类型，可读写。

ScrollRow - ScrollRow 属性说明

如果指定窗口处于拆分状态，Window 对象的 ScrollRow 属性表示左上方的窗格。如果某些窗格处于冻结状态，则 Window 对象的 ScrollRow 属性将不包括冻结的区域。

②滚动列

Worksheets("Sheet2").Activate

ActiveWindow.ScrollColumn =6

代码解释：上述代码的功能是，先激活Sheet2，将其作为活动工作表，然后，自动拖动水平滚动条，将第6列拖到第一列的位置，即第一列至第5列将被拖到窗口中的左边，并看不到，而第6列则显示在可视窗口的最左边(在可视范围的第一列位置)。

与此相关的知识：

Window.ScrollColumn 属性

返回或设置指定窗格或窗口最左边的列号。Long 型，可读写。

语法

表达式.ScrollColumn

表达式一个代表 Window 对象的变量。

说明：如果窗口处于拆分状态，则 Window 对象的 ScrollColumn 属性表示左上方的窗格。如果某些窗格处于冻结状态，则 Window 对象的 ScrollColumn 属性将不包括冻结的区域。