Skip to main content

如何在 Excel 工作簿的所有工作表中同步相同選定的區域？

Author: Tech Support Last Modified: 2025-05-12

在處理 Excel 工作簿時，您可能需要選擇多個工作表中的相同區域，以便更有效地比較或分析數據。以下方法將幫助您快速同步所有工作表中選定的區域，讓您能更一致地查看資訊。

A screenshot of Sheet1 with a range selected A screenshot of Sheet2 with the same range selected

使用「全選工作表」功能選擇所有工作表中的相同區域

一鍵快速同步所有相同區域的工作表

使用 VBA 程式碼同步工作表

使用「全選工作表」功能選擇所有工作表中的相同區域

您可以讓所有工作表在同一工作簿中選擇相同的區域，如下所示：

1. 在活動工作表中選擇一個您希望在所有工作表中選取的區域。例如，範圍 "A103:C112"。

2. 接著右鍵點擊工作表標籤，並從選單中選擇「全選工作表」。

A screenshot of the 'Select All Sheets' option in Excel's right-click menu

3. 工作簿中的所有工作表都會有相同的區域被選取。

注意：使用此方式選擇所有工作表中的相同區域，只能選擇所有工作表中的相同區域，但無法在視窗的相同位置顯示所有選定的區域。

一鍵快速同步所有工作表到相同區域

如果您已安裝「Kutools for Excel」，您可以使用「同步工作表」功能輕鬆同步所有工作表，使其擁有相同的區域，步驟如下：

Kutools for Excel 提供超過 300 種進階功能，簡化複雜任務，提升創造力與效率。 結合 AI 能力，Kutools 能夠精準自動化任務，讓數據管理變得輕而易舉。Kutools for Excel 的詳細資訊...免費試用...

1. 啟動一個工作表並選擇您想使用的區域。

2. 點擊 Kutools Plus > 工作表 > 同步工作表。

3. 此時會彈出一個提示框，提醒您工作簿內的所有工作表將擁有相同的選定區域和左上角儲存格。

A screenshot of the Synchronize Worksheets prompt box

4. 點擊確定後，所有工作表都已同步。當您切換所有工作表時，每個工作表都會有相同的區域被選取。請參閱截圖：

A screenshot of synchronized worksheets showing the same selected range A screenshot of synchronized worksheets showing the same selected range
A screenshot of synchronized worksheets showing the same selected range A screenshot of synchronized worksheets showing the same selected range
注意：如果在「同步工作表」提示框中勾選「下次不要再顯示」，則下次應用此功能時該提示框將不會出現。

 

提示：

使用 VBA 程式碼同步工作表

使用以下 VBA 程式碼，您可以快速讓所有工作表選取相同的區域，並在視窗的相同位置顯示選定的區域。

1. 在某個工作表中選擇一個區域，然後點擊「開發工具」>「Visual Basic」，將會顯示一個新的「Microsoft Visual Basic for Applications 窗口」。

2. 點擊「插入」>「模組」，然後複製並將以下程式碼粘貼到模組中：

VBA：同步工作簿中的所有工作表

Sub SynchSheets()
'Update 20130912
Dim WorkShts As Worksheet
Dim sht As Worksheet
Dim Top As Long
Dim Left As Long
Dim RngAddress As String
Application.ScreenUpdating = False
Set WorkShts = Application.ActiveSheet
Top = Application.ActiveWindow.ScrollRow
Left = Application.ActiveWindow.ScrollColumn
RngAddress = Application.ActiveWindow.RangeSelection.Address
For Each sht In Application.Worksheets
    If sht.Visible Then
        sht.Activate
        sht.Range(RngAddress).Select
        ActiveWindow.ScrollRow = Top
        ActiveWindow.ScrollColumn = Left
    End If
Next sht
WorkShts.Activate
Application.ScreenUpdating = True
End Sub

3. 接著點擊「執行」按鈕或按「F5」鍵來執行程式碼，所有工作表都會選取相同的區域，並在視窗的相同位置顯示選定的區域。