如何在 Excel 中將特定工作表或所有工作表滾動到首行？

無論您是要將特定工作表還是整個工作簿中的所有工作表滾動到頂部，VBA 程式碼都能提供快速且高效的解決方案。本指南將解釋如何使用簡單的 VBA 腳本來簡化導航並專注於您的數據。

使用 VBA 程式碼將特定工作表或所有工作表滾動到首行

使用 VBA 程式碼將特定工作表或所有工作表滾動到首行

要將特定工作表或所有工作表滾動到 Excel 的首行，請按照以下步驟操作。

1. 在需要滾動到頂部的工作表中，請按下 Alt + F11 鍵以打開 Microsoft Visual Basic for Applications 視窗。

2. 在 Microsoft Visual Basic for Applications 視窗中，點擊 插入 > 模組。然後將以下任一 VBA 程式碼複製並貼到程式碼視窗中。

VBA 程式碼：將特定工作表滾動到首行

Sub ScrollToTop()
ActiveWindow.ScrollRow = 1
End Sub

VBA 程式碼：將所有工作表滾動到首行

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. 將 VBA 程式碼輸入到程式碼視窗後，請按 F5 鍵執行該程式碼。

當前工作簿中的活動工作表或所有工作表將立即滾動到頂部。