方法1vba实现:sheets("你要控制的表名").ScrollArea = "区域" 使用方法: 1- 在EXCEL中同时按下alt + F11 2- 将以上语句——sheets括号内的文字替换成你自己的表名,引号不要去掉——复制到“代码窗口”。 3- 将光标点到此语句所在行 4- 点运行按钮 例:Private Sub Workbook_Open() Sheets("工资查询").ScrollArea = "A1:L19" End Sub 方法2 vba实现:sheets("你要控制的表名").ScrollArea = "A1:P30" 使用方法: 1- 在EXCEL中同时按下alt + F11 2- 将以上语句——sheets括号内的文字替换成你自己的表名,引号不要去掉——复制到新出现窗口的右下角的“立即窗口”。 3- 将光标点到此语句所在行 4- 回车
|