如何在Excel中每頁列印的底部重複列印行？

Author Siluvia Last modified 2025-08-23

預設情況下，Excel 提供了讓使用者在頂部重複列印行的功能。但在某些情況下，您可能希望在頁面底部而不是頂部重複列印行。本文將向您展示一些小技巧。

使用VBA代碼在底部重複列印行

您可以運行以下 VBA 代碼，將指定的行插入到每頁的頁尾中。然後，您可以在 Excel 中每頁列印的底部重複列印該行。

1. 同時按下 Alt + F11 鍵以打開 Microsoft Visual Basic for Application 窗口。

2. 在 Microsoft Visual Basic for Application 窗口對話框中，點擊插入 > 模組。然後將以下 VBA 代碼複製並粘貼到模組窗口中。

VBA 代碼：將指定行插入到每頁列印的頁尾中

Sub MyFooter()
	Dim xTxt As String
	Dim xAddress As String
	Dim xRg As Range
	Dim xCell As Range
	On Error Resume Next
	xAddress = ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Select the row you will insert repeatedly at the bottom:", "Kutools for Excel", xAddress, , , , , 8)
	If xRg Is Nothing Then Exit Sub
		For Each xCell In xRg
			xTxt = xTxt & xCell.Value & " "
		Next
		ActiveSheet.PageSetup.LeftFooter = xTxt
	End Sub

3. 按下 F5 鍵來運行代碼。然後會彈出一個 Kutools for Excel 對話框，請選擇需要在每頁列印底部重複列印的行，然後點擊確定按鈕。

A screenshot showing how to select rows to repeat at the bottom of every printed page

現在，指定的行內容已添加到當前工作表中每頁列印的頁尾中。您可以開始列印工作表。

備註：如果您想在整個工作簿的每頁底部重複列印所選內容，可以應用頁尾功能將內容插入所有工作表的頁尾中。

Kutools for Excel 的 插入標題行 功能可幫助您快速在 Excel 中選定範圍內的每隔 n 行之前插入標題行，如下方截圖所示。
立即下載並試用！

A screenshot of Kutools for Excel's Insert Title Rows utility, which helps repeat title rows in every nth row

最佳 Office 生產力工具

🤖	Kutools AI 助手：以智能執行為基礎，革新數據分析｜生成程式碼｜創建自訂公式｜分析數據並生成圖表｜調用 Kutools 增強函數…
	熱門功能：查找、選取項目的背景色或標記重複值｜刪除空行｜合併列或單元格且不遺失數據｜四捨五入（免公式）...
	高級 LOOKUP：多條件 VLookup｜多值 VLookup｜多表查找｜模糊查找...
	高級下拉列表：快速創建下拉列表｜依賴型下拉列表｜多選下拉列表...
	列管理器：添加指定數量的列｜移動列｜切換隱藏列的顯示狀態｜比較區域及列...
	精選功能：網格聚焦｜設計檢視｜增強編輯欄｜工作簿及工作表管理器｜資源庫（快捷文本）｜日期提取器｜合併資料｜加密/解密儲存格｜按列表發送電子郵件｜超級篩選｜特殊篩選（篩選粗體/傾斜/刪除線...）...
	15 大工具集：12 項文本工具（添加文本、刪除特定字符…）｜50+ 儀表類型（甘特圖等）｜40+ 實用公式（基於生日計算年齡等）｜19 項插入工具（插入QR码、根據路徑插入圖片等）｜12 項轉換工具（金額轉大寫、匯率轉換等）｜7 項合併與分割工具（高級合併行、分割儲存格等）｜...及更多