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

 　　①滚动行

　　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 属性将不包括冻结的区域。