Stellen Sie die Position im Fenster mit VBA in Microsoft Excel
wieder her Wenn Sie das Bildschirmbild für den Benutzer wiederherstellen möchten, nachdem ein Makro die Fensteransicht geändert hat, können Sie manchmal einfach die Zelle aktivieren, die beim Starten des Makros die aktive Zelle war. Dies ist nicht immer erfolgreich.
Der folgende Beispielcode stellt die Fensterposition so wieder her, wie sie beim Starten des Makros war:
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