如何在 Excel 中複製多個選取的範圍？

Excel 內建的剪貼簿功能常被忽略，卻能輕鬆幫您跨工作表彙整多段內容！透過剪貼簿窗格，您可從不同位置逐一複製內容、集中收集，再一次性貼到目標工作表的指定區域。此方法特別適合需彙集視覺內容、圖形或小型選取範圍的情境；但請注意，Excel 會將這些操作視為獨立的複製動作，因此貼上時格式與結構可能無法完全一致。以下是詳細步驟與重要注意事項：

1. 按一下首頁>中的剪貼簿群組，即可顯示剪貼簿窗格。（此功能通常位於 Excel 功能區中剪貼簿群組的右下角。）請參閱下方螢幕截圖：

2. 逐一複製您需要的每個範圍。每次複製後，所選內容都會以獨立項目顯示於左側的剪貼簿窗格中。針對所有欲合併的範圍重複此步驟，並可隨時檢視剪貼簿清單，確認已擷取所有必要範圍，還能在貼上前輕鬆移除誤複製的項目！

3. 前往目標工作表，選取欲彙整複製範圍的儲存格，然後在剪貼簿窗格中按一下全部貼上，即可一次貼上所有已收集的項目！

透過剪貼簿貼上時，內容預設會以垂直方式堆疊；因此，若資料需符合特定結構（例如表格或清單），您可能需要手動調整貼上結果。此外，剪貼簿最多可保留 24 個項目——一旦超過此數量，最早的項目將自動被取代。貼上前，請務必確認目標區域為空白，以免意外覆寫重要資料。

輕鬆將多個工作表/活頁簿中的多個選取範圍合併至單一工作表/活頁簿

若您需要從眾多工作表或活頁簿中彙集或合併內容，手動重複跨活頁簿複製貼上不僅繁瑣、耗時，還容易出錯—尤其在處理大規模資料彙整時更是如此。透過 Kutools for Excel 的合併（工作表與活頁簿）功能，您能高效地將多個工作表與活頁簿整合至單一目的地，大幅減少手動操作，同時完整保留原始資料結構。此功能特別適合用於月報製作、跨部門資料摘要或歷史資料整合，助您輕鬆掌握資料整合效率！

若您的工作流程經常需要複製多個不連續的範圍，透過 VBA（Visual Basic for Applications）自動化此程序，不僅能大幅節省時間，還能有效降低人為錯誤。此解決方案最適合進階使用者，或需重複執行結構化任務的情境——例如每週固定複製相同區段，或為報表重新格式化資料。雖然此方法具備高度彈性，但仍須謹慎執行每個步驟，並留意貼上位置，以免意外覆寫既有資料。

1. 按住 Ctrl 鍵，並用滑鼠逐一選取所有不相鄰的目標範圍，輕鬆完成彙集！

2. 同時按下 Alt+F11，開啟 Microsoft Visual Basic for Applications（VBA）編輯器視窗，接著點選插入＞ 模組，並將下列程式碼直接貼上至模組視窗中：

Option Explicit
Sub CopyMultipleSelection()
Dim SelAreas() As Range
Dim PasteRange As Range
Dim UpperLeft As Range
Dim NumAreas As Integer, i As Integer
Dim TopRow As Long, LeftCol As Integer
Dim RowOffset As Long, ColOffset As Integer
Dim NonEmptyCellCount As Integer
' Exit if a range is not selected
If TypeName(Selection) < > "Range" Then
MsgBox "Select the range to be copied. A multiple selection is allowed."
Exit Sub
End If
' Store the areas as separate Range objects
NumAreas = Selection.Areas.Count
ReDim SelAreas(1 To NumAreas)
For i = 1 To NumAreas
Set SelAreas(i) = Selection.Areas(i)
Next
' Determine the upper left cell in the multiple selection
TopRow = ActiveSheet.Rows.Count
LeftCol = ActiveSheet.Columns.Count
For i = 1 To NumAreas
If SelAreas(i).Row < TopRow Then TopRow = SelAreas(i).Row
If SelAreas(i).Column < LeftCol Then LeftCol = SelAreas(i).Column
Next
Set UpperLeft = Cells(TopRow, LeftCol)
' Get the paste address
On Error Resume Next
Set PasteRange = Application.InputBox _
(Prompt:="Specify the upper left cell for the paste range:", _
Title:="Copy Mutliple Selection", _
Type:=8)
On Error GoTo 0
' Exit if canceled
If TypeName(PasteRange) < > "Range" Then Exit Sub
' Make sure only the upper left cell is used
Set PasteRange = PasteRange.Range("A1")
' Check paste range for existing data
NonEmptyCellCount = 0
For i = 1 To NumAreas
RowOffset = SelAreas(i).Row - TopRow
ColOffset = SelAreas(i).Column - LeftCol
NonEmptyCellCount = NonEmptyCellCount + _
Application.CountA(Range(PasteRange.Offset(RowOffset, ColOffset), _
PasteRange.Offset(RowOffset + SelAreas(i).Rows.Count - 1, _
ColOffset + SelAreas(i).Columns.Count - 1)))
Next i
' If paste range is not empty, warn user
If NonEmptyCellCount < > 0 Then _
If MsgBox("Overwrite existing data?", vbQuestion + vbYesNo, _
"Copy Multiple Selection") < > vbYes Then Exit Sub
' Copy and paste each area
For i = 1 To NumAreas
RowOffset = SelAreas(i).Row - TopRow
ColOffset = SelAreas(i).Column - LeftCol
SelAreas(i).Copy PasteRange.Offset(RowOffset, ColOffset)
Next i
End Sub

3. 在 VBA 視窗中，點擊執行按鈕（或按下 F5）即可立即執行程式碼！

4. 系統將彈出一個輸入方塊，提示您指定欲貼上合併範圍左上角的儲存格。確認後，請點擊確定。

注意事項與疑難排解：此 VBA 程式碼會從指定目的地的左上角開始貼上所選範圍。請留意可能發生的資料覆寫問題——若目的地區域非空白，系統將顯示警告。若您遇到「下標超出範圍」或其他錯誤訊息，請確認所選內容是否全為儲存格範圍。此方法不支援複製非儲存格項目（如圖形或圖表），且僅會複製數值與儲存格格式，不會複製物件。

Kutools for Excel 提供更高效的解決方案！其多區域複製工具讓您在單一工作表中一次選取所有所需範圍，並一步完成複製。透過簡潔直覺的介面，您可精準選擇貼上方式——例如貼上全部內容、僅公式、僅數值或僅格式等，還能選擇性保留行高與列寬，大幅節省時間並確保格式一致，效率升級不容錯過！

1. 按住 Ctrl 鍵逐一選取範圍，接著前往 Kutools＞ 多區域複製。操作畫面請參閱下方螢幕截圖：

2. 在多區域複製對話方塊中，從全部的選擇性貼上選項中進行選擇，並按一下確定確認。您也可在此進一步自訂貼上設定—例如僅貼上數值或保留全部格式。

注意：若需為所有範圍保留原始行高與列寬，請先勾選包括行高與包括列寬選項，再按確定。當結構外觀至關重要時（例如製作範本或簡潔報表），此功能特別實用！

3. 在出現的目的地選取方塊中，指定要貼上範圍左上角的儲存格，然後按一下確定。

所有選取的範圍將連續貼至目的地位置，並可依需求保留原始尺寸。此方法不僅快速，更能免去手動重複複製貼上的麻煩，還能根據您的工作流程靈活調整貼上結果。

按此處以取得更多關於多區域複製功能的資訊

為撰寫摘要報告或進行數據分析，常需彙整分散於多個工作表甚至不同活頁簿中的資料片段。手動執行不僅耗時，還容易出錯，尤其在處理大型檔案時更是如此。Kutools for Excel 提供合併工作表功能，將從多個工作表甚至活頁簿中複製指定區域的作業，轉化為簡單且有引導性的流程。此工具極適合用於每月資料整合、問卷結果彙總、發票資料整理，以及其他需要跨多個來源統一彙整資料的任務！

1. 請先點擊 Excel 功能區上的 KUTOOLS PLUS> 合併。

2. 在「合併工作表 – 步驟 1（共 3）」對話方塊中，選取將活頁簿中的多個工作表合併為一個工作表，然後按一下下一步。

3. 在步驟 2（共 3）中，請執行下列操作：

（1) 在工作簿列表中，選取活頁簿，然後針對每個工作表，按一下其後的瀏覽按鈕，以精準選取您所需的範圍。
（2) 若要加入其他活頁簿，請按一下新增，並重複步驟（1），從額外檔案中選取資料至指定區域。
（3) 確認所有選項無誤後，立即按一下完成！

4. 系統將彈出提示，詢問您是否要將目前設定儲存為情境以供日後使用。請點選是立即儲存，或點選否略過儲存並繼續進行。

完成後，來自不同工作表或活頁簿的所有限定區域將自動彙整至單一新工作表或活頁簿中，無需反覆手動複製貼上，不僅完整保留原有資料結構，更大幅加快分散資訊的整合速度。

對於希望在不使用 VBA 或剪貼簿的情況下，將非連續範圍的內容彙總為單一清單或摘要的使用者來說，Excel 公式非常實用。此方法特別適合處理結構化資料集，例如將多個欄位或清單中的所有資料集中到單一摘要區域。以下為實際應用範例，搭配下列公式：

1. 假設您想將範圍 A1:A5 與 C1:C5 合併為從儲存格 E1 開始的單一欄，請在 E1 中輸入下列公式：

=VSTACK(A1:A5, C1:C5)

2. 按下 Enter 以確認，兩個範圍的所有數值將依序堆疊顯示於 E1 及其下方儲存格中。若您需要將多個非相鄰範圍的資料全部排列至其他位置的摘要範圍，只需調整 VSTACK 函數內的範圍即可。

注意事項：這些公式適用於靜態資料摘要，但無法保留來源區域的格式、公式、圖表或合併儲存格。最適合用於彙整清單或簡單表格。若出現 #REF!等錯誤，請務必再次確認範圍邊界是否正確。