Vratite položaj u prozoru pomoću VBA u programu Microsoft Excel

Anonim

Ako želite vratiti sliku zaslona za korisnika nakon što je makronaredba promijenila prikaz prozora,
ponekad možete jednostavno aktivirati ćeliju koja je bila aktivna ćelija kada se makro pokrenuo. Ovo nije uvijek uspješno.
Sljedeći primjer koda vratit će položaj prozora baš kao što je bio pri pokretanju makronaredbe:

Dim aRow As Long, aColumn As Integer, aRange As String 'globalne varijable Sub RememberWindowPosition ()' pokrenite ovo prije nego unesete promjene S ActiveWindow aRow = .ScrollRow aColumn = .ScrollColumn End With aRange = Selection.Address End Sub Sub RestoreWindowPosition () 'run ovo za vraćanje položaja u prozoru Raspon (aRange). Odaberite With ActiveWindow .ScrollRow = aRow .ScrollColumn = aStačak završi s End Sub