Hvis du vil gjenopprette skjermbildet for brukeren etter at en makro har endret vindusvisningen,
Noen ganger kan du bare aktivere cellen som var den aktive cellen da makroen startet. Dette er ikke alltid vellykket.
Følgende eksempelkode vil gjenopprette vindusposisjonen akkurat som den var da makroen startet:
Dim aRow As Long, aColumn As Integer, aRange As String 'global variables Sub RememberWindowPosition ()' kjør dette før du gjør endringer Med ActiveWindow aRow = .ScrollRow aColumn = .ScrollColumn End With aRange = Selection.Adress Slutt Sub Sub RestoreWindowPosition () 'run dette for å gjenopprette posisjon i vinduet Range (aRange) .Velg With ActiveWindow .ScrollRow = aRow .ScrollColumn = aColumn End With End Sub