如何列印多份文件並加上連續頁碼？

作者孫修改日期2025-10-27

您是否曾需要列印同一張工作表的多份副本，並為每份標註獨一無二的連續編號？例如，印製 10 份表單時，第一份的 A1 儲存格顯示 001，第二份顯示 002，依此類推，直到最後一份顯示 010. 這種方式非常適合用於製作編號發票、票券、訂單表單，或任何需透過個別編號追蹤副本以利組織與稽核的批次作業。

遺憾的是，Excel 並未內建自動在指定儲存格中遞增編號並列印多份的功能。若需大量列印，手動逐一編輯工作表實在不切實際。然而，只要套用簡單的 VBA 巨集，您就能輕鬆自動化整個流程，節省寶貴時間、降低人為錯誤，並確保每份副本都擁有符合需求的獨特編號。

透過 VBA 程式碼打印份數不同編號

使用 Excel 公式與手動列印

透過 VBA 程式碼打印份數不同編號

此方法運用 VBA 巨集列印工作表的多份副本，並在每次列印時自動將連續編號填入指定儲存格。

請依照下列步驟快速建立並執行巨集：

1. 首先，啟用您要列印的工作表，然後按下 Alt + F11，即可開啟 Microsoft Visual Basic for Applications（VBA）編輯器視窗。

2. 在 VBA 編輯器中，點選插入> 模組以新增模組，並將下列程式碼複製貼上至模組視窗中。（請參閱截圖以取得視覺指引。）

VBA：設定列印份數並自動加上連續頁碼。

Sub PrintCopiesWithNumbers()
'UpdatebyEntendoffice20161031
    Dim i As Integer
    Application.ScreenUpdating = False
    For i = 1 To 10
        Range("A1").Value = "'00" & i
       ActiveSheet.PrintOut
    Next i
    Application.ScreenUpdating = True
    MsgBox "Total printed copies: " & (i - 1), vbInformation, "Kutools for Excel"
End Sub

顯示用於在 Excel 中列印帶有序號副本的 VBA 程式碼模組的截圖

參數說明與提示：

在程式碼中，參照 A1 代表序列號將顯示的儲存格。若您偏好其他儲存格（例如 B2），請據此更新參照。
1 To 10 指定要列印的批量複製份數（在此範例中為 10）。您可依需求將 10 替換為任何其他正整數。
"'00" & I 會將序號格式化為帶前置零的三位數字（例如 001、002、003）。若您希望採用其他格式（例如從 100 開始，或不使用前置零），請據此調整字串。
執行巨集前，請確認您的工作表已準備就緒，且目標儲存格中不含可能遭覆寫的資料。建議您先儲存活頁簿再繼續操作，因為巨集動作無法復原。

3. 在您的工作表仍處於啟用狀態時，按下 F5 鍵，或點選 VBA 編輯器中的執行按鈕以執行程式碼。此時將彈出對話方塊通知您（例如）：「將列印 10 份，並附上連續的數字」。點選確定即可繼續；巨集會自動依序處理每個編號、填入指定儲存格，並列印工作表。每份列印結果皆會根據您的設定顯示獨特編號。
確認已列印 10 份帶有序號副本的對話框截圖

使用 Excel 公式與手動列印

若您只需要少量副本，或偏好不使用巨集，可善用 Excel 的填滿控點快速產生連續編號，再手動逐一列印每一列。此方法特別適合用於標籤、識別證或表單等需要獨特編號的小批量作業。

1. 在新欄位（例如 A 欄）的第一個儲存格輸入起始序號，例如 001. 您可在 A1 儲存格輸入下列公式來達成：

=TEXT(ROW(A1),"000")

2. 向下拖曳填滿控點，將公式複製至您所需的列印副本數量（例如：若需 10 份，請拖曳至第 10 列），每個儲存格都會自動顯示帶有前置零的連續編號！

3. 針對每份所需副本，將整行或整個資料集複製到新工作表，並使用 Excel 的列印功能逐一列印各工作表。此手動方法最適合小批量作業，且能在列印前提供更清晰的視覺確認，確保輸出準確無誤！

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多