Obnovte pozíciu v okne pomocou VBA v programe Microsoft Excel

Anonim

Ak chcete používateľovi obnoviť obrázok na obrazovke po tom, ako makro zmenilo zobrazenie okna,
Niekedy môžete jednoducho aktivovať bunku, ktorá bola aktívnou bunkou pri spustení makra. To nie je vždy úspešné.
Nasledujúci príklad kódu obnoví polohu okna rovnako, ako to bolo pri spustení makra:

Dim aRow As Long, aColumn As Integer, aRange As String 'global variables Sub RememberWindowPosition ()' run this before creating changes with ActiveWindow aRow = .ScrollRow aColumn = .ScrollColumn End With aRange = Selection.Address End Sub Sub RestoreWindowPosition () 'run toto obnoví pozíciu v okne Rozsah (aRange). Vyberte pomocou ActiveWindow .ScrollRow = aRow .ScrollColumn = aColumn End With End Sub