【ExcelVBA】表示画面をシートの左上にする

ExcelVBA, シートの操作

表示画面をワークシートの左上

表示画面をワークシートの左上(カーソル位置も画面左上)

Sub Sample1()
    
    With ThisWorkbook.ActiveSheet
        Application.Goto Reference:=.Range("A1"), Scroll:=True
    End With
    
End Sub

表示画面をワークシートの左上(カーソル位置は移動しない)

Sub Sample2()

    ThisWorkbook.ActiveSheet.Activate

    ActiveWindow.ScrollColumn = 1
		ActiveWindow.ScrollRow = 1

End Sub