Ritiniet vertikāli un ritiniet horizontāli - VBA koda piemēri

Jums var būt nepieciešama darbgrāmata, lai vienmēr atvērtu konkrētu lapas skatu vai atrašanās vietu vai, iespējams, vienkārši mainītu skatu no makro. To var izdarīt, izmantojot ScrollRow un ScrollColumn.

ScrollRow

Izmanto, lai programmiski ritinātu izklājlapu vertikāli. Šis piemērs ritinās izklājlapu līdz 5. rindai.

ActiveWindow.ScrollRow = 5

Ritināšanas kolonna

Izmanto, lai programmiski ritinātu izklājlapu horizontāli. Šis piemērs ritinās izklājlapu līdz 5. slejai.

ActiveWindow.ScrollColumn = 5

Automātiski ritiniet līdz noteiktai rindai un kolonnai darbgrāmatā

Ievietojot šādu kodu modulī, vienmēr tiks ritināta darbgrāmatas 1. lapa līdz 5. rindai un 5. slejai, ja pēc atvēršanas ir iespējoti makro:

 Sub auto_open () Sheet 1. Aktivizēt ActiveWindow.ScrollColumn = 5 ActiveWindow.ScrollRow = 5 End Sub