2021-10-22 技巧1_自动移动每页光标到A1单元格
Public Sub InitCells()
Dim iSheet As Long
For iSheet = Sheets.Count To 1 Step -1
Sheets(iSheet).Activate
'ActiveWindow.Zoom = 100
ActiveWindow.ScrollRow = 1
ActiveWindow.ScrollColumn = 1
Sheets(iShe
原创
2021-10-22 16:27:27 ·
200 阅读 ·
0 评论