Microsoft ExcelでVBAを使用してウィンドウ内の位置を復元

投稿日: 2020年10月22日 2020年11月12日
タグ: general-topics-in-vba

マクロがウィンドウビューを変更した後にユーザーの画面画像を復元する場合は、マクロの開始時にアクティブセルであったセルをアクティブ化できる場合があります。これは常に成功するとは限りません。

次のサンプルコードは、マクロが開始されたときと同じようにウィンドウ位置を復元します：

Dim aRow As Long, aColumn As Integer, aRange As String ' global variables

Sub RememberWindowPosition() ' run this before making changes

With ActiveWindow

aRow = .ScrollRow

aColumn = .ScrollColumn

End With

aRange = Selection.Address

End Sub

Sub RestoreWindowPosition() ' run this to restore position in the window

Range(aRange).Select

With ActiveWindow

.ScrollRow = aRow

.ScrollColumn = aColumn

End With

End Sub