Hoe scrol je een bepaald blad of alle bladen naar boven in Excel?

Dit artikel laat zien hoe u door een opgegeven blad of alle bladen naar de bovenste rij in een werkmap in Excel kunt scrollen.

Blader door een opgegeven blad of alle bladen naar boven met VBA-code

---

Blader door een opgegeven blad of alle bladen naar boven met VBA-code

Ga als volgt te werk om een ​​bepaald blad of alle bladen naar de bovenste rij in Excel te scrollen.

1. In het werkblad moet je naar boven scrollen, druk op de anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module. Kopieer en plak vervolgens VBA-code in het codevenster.

VBA-code: scrol door een opgegeven werkblad naar boven

Sub ScrollToTop()
ActiveWindow.ScrollRow = 1
End Sub

Pas de volgende VBA-code toe om alle werkbladen naar de top in de huidige werkmap te scrollen.

VBA-code: scrol door alle werkbladen naar boven

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. Nadat u de VBA-code in het codevenster hebt ingevoerd, drukt u op F5 sleutel om de code uit te voeren.

Vervolgens worden het actieve werkblad of alle werkbladen in de huidige werkmap onmiddellijk naar boven geschoven.