前言：
眼前同学们对“滚动条不受控制”都比较重视，兄弟们都想要分析一些“滚动条不受控制”的相关知识。那么小编在网络上收集了一些对于“滚动条不受控制””的相关文章，希望同学们能喜欢，咱们快快来学习一下吧！实现效果：关闭excel文件，所有工作表窗口的滚动条自动回复到最上、最左位置
最后一行，看滚动条的位置
最后一列，看滚动条的位置
对于数据量较多的，可以用这段代码！
代码如下：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim sht%
Application.ScreenUpdating = False
sht = Worksheets.Count
For i = sht To 1 Step -1 '循环所有工作表
Sheets(i).Activate
ActiveWindow.ScrollRow = 1 '设置当前工作表最上面显示的行号
ActiveWindow.ScrollColumn = 1 '设置当前工作表最左边显示的列号
Next
ThisWorkbook.Save
Application.ScreenUpdating = True
End Sub
如何操作
按Alt+F11打开VBE窗口，双击“ThisWorkbook”模块，粘贴代码即可！
版权声明：
本站文章均来自互联网搜集，如有侵犯您的权益，请联系我们删除，谢谢。
