Sådan ruller du et bestemt ark eller alle ark til toppen i Excel?
Denne artikel viser metoden til at rulle et bestemt ark eller alle arkene til den øverste række i en projektmappe i Excel.
Rul et angivet ark eller alle ark til toppen med VBA-kode
Rul et angivet ark eller alle ark til toppen med VBA-kode
For at rulle et specificeret ark eller alle ark til øverste række i Excel, gør du som følger.
1. I regnearket skal du rulle til toppen, tryk på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
2. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Moduler. Kopier og indsæt derefter VBA-kode i kodevinduet.
VBA-kode: Rul et angivet regneark til toppen
Sub ScrollToTop()
ActiveWindow.ScrollRow = 1
End Sub
For at rulle alle regneark til toppen i den aktuelle projektmappe, skal du anvende følgende VBA-kode.
VBA-kode: Rul alle regneark til toppen
Sub Select_A1_On_Activeworkbook()
Dim xSheet As Worksheet
For Each xSheet In ActiveWorkbook.Sheets
xSheet.Activate
ActiveSheet.Range("A1").Select
Next
ActiveWorkbook.Worksheets(1).Activate
End Sub
3. Når du har indtastet VBA-kode i vinduet Kode, skal du trykke på F5 nøgle for at køre koden.
Derefter rulles det aktive regneark eller alle regneark i den aktuelle projektmappe straks til toppen.
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!