【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