Hur rullar man ett specifikt ark eller alla ark till den översta raden i Excel?

Oavsett om du vill rulla ett specifikt ark eller alla ark i en arbetsbok till toppen, ger VBA-kod en snabb och effektiv lösning. Den här guiden förklarar hur du använder enkla VBA-skript för att effektivisera din navigering och fokusera på dina data.

Rulla ett specifikt ark eller alla ark till den översta raden med VBA-kod

Rulla ett specifikt ark eller alla ark till den översta raden med VBA-kod

För att rulla ett specifikt ark eller alla ark till den översta raden i Excel, gör så här.

1. I kalkylbladet måste du bläddra till toppen, tryck på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulerna. Kopiera sedan och klistra in någon av VBA-koderna nedan i kodfönstret.

VBA-kod: Rulla ett specifikt kalkylblad till den översta raden

Sub ScrollToTop()
ActiveWindow.ScrollRow = 1
End Sub

VBA-kod: Bläddra alla kalkylblad till den översta raden

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 angett VBA-kod i kodfönstret, tryck på F5 för att köra koden.

Det aktiva kalkylbladet eller alla kalkylblad i den aktuella arbetsboken rullas omedelbart till toppen.