如何在 Excel 的頁首或頁尾中插入儲存格的數值？

作者Xiaoyang修改日期2025-07-10

在 Microsoft Excel 中，您可輕鬆運用內建功能，將檔案路徑、檔案名稱、目前日期或其他系統資訊插入頁首或頁尾。然而，有時您可能希望直接使用特定儲存格的實際內容作為頁首或頁尾文字——這項功能並未直接內建於 Excel 的標準介面中，因而引發以下常見疑問：如何將儲存格的數值插入工作表的頁首或頁尾？許多使用者在準備報表、表單或匯出資料時都會遇到此需求，例如希望在列印輸出的頁首或頁尾中動態顯示客戶名稱或自訂日期，確保每份列印內容都能即時反映工作表的最新狀態。針對此需求，以下提供 VBA 與第三方工具兩種解決方案，並說明各自最適用的情境。

使用 VBA 程式碼將儲存格數值放入單一工作表的頁首或頁尾

使用 VBA 程式碼將儲存格數值放入所有工作表的頁首或頁尾

使用 Kutools for Excel 將插入文檔信息插入頁首／頁尾

手動將儲存格內容複製到頁首或頁尾對話方塊

使用 VBA 程式碼將儲存格數值放入單一工作表的頁首或頁尾

若您希望在目前工作表的頁首或頁尾中顯示特定儲存格的內容，這無法透過 Excel 內建的頁首／頁尾功能達成；不過，只需一段簡單的 VBA 巨集，即可輕鬆實現此需求。

執行任何 VBA 程式碼前，請務必先儲存活頁簿，因為巨集會修改物件且無法復原；同時，也請確認您的 Excel 設定已允許執行巨集。

1. 先啟用您欲在頁首或頁尾中插入儲存格數值的工作表，再按下 ALT + F11，即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 點選插入> 模組，並將下列程式碼貼上至新的模組視窗中。

VBA 程式碼：將指定儲存格數值放入單一工作表的頁首

Sub HeaderFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftHeader = WorkRng.Range("A1").Value
End Sub

3. 按下 F5（或按一下執行按鈕）以執行此巨集。執行後，系統將彈出對話方塊，提示您選取要用於頁首的儲存格。
用於選取要將其內容插入頁首的儲存格之對話框

4. 選取儲存格並按一下確定後，所選儲存格的數值就會插入至作用中工作表頁首的左側。若要檢視頁首，請前往檔案> 列印（或切換至）版面配置檢視模式）。範例如下：
儲存格值已插入頁首

注意事項：

若您希望在頁尾（而非頁首）顯示儲存格內容，請使用下列程式碼。操作步驟完全相同——只需將此程式碼貼到模組中並執行即可。

VBA 程式碼：將指定儲存格數值放入單一工作表的頁尾

Sub FooterFrom()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
Application.ActiveSheet.PageSetup.LeftFooter = WorkRng.Range("A1").Value
End Sub

若要變更位置，請將程式碼中的 LeftHeader 或 LeftFooter 依需求替換為 CenterHeader、RightHeader、CenterFooter 或 RightFooter。例如，若要在頁眉中央插入數值，請將 LeftHeader 改為 CenterHeader。
執行指令碼前，務必確認儲存格參照包含有效內容；若引用的是空白儲存格，頁首／頁尾將會留空。
執行巨集後，若修改了來源儲存格，頁首／頁尾將不會自動更新；您必須重新執行巨集，才能讓顯示的資訊同步更新。
當您希望自動化「儲存格至頁首」的動作，且無需頻繁更新，或是在處理每份列印內容皆具動態特性的範本時，建議採用此 VBA 方法。
若出現「巨集已停用」警告，請前往檔案 > 選項 > 信任中心，確認巨集設定已啟用。

使用 VBA 程式碼將儲存格數值放入所有工作表的頁首或頁尾

當您需要將特定儲存格的數值套用為整個活頁簿所有工作表的頁首或頁尾時，若逐一對每個工作表執行先前的程式碼，將相當耗時。此時，您可以使用另一個專門設計的 VBA 巨集，一次將所選儲存格的內容插入活頁簿中每個工作表的頁首或頁尾。此方法常見於需在整份報告中維持一致頁首／頁尾資訊的場合。

1. 開啟您要套用變更的活頁簿，然後按下 ALT + F11，即可啟動 Visual Basic for Applications 視窗。

2. 在 VBA 編輯器中，點選插入> 模組，並將下列巨集複製貼上至模組視窗中。

VBA 程式碼：將指定儲存格數值放入所有工作表的頁尾

Sub AddFooterToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftFooter = WorkRng.Range("A1").Value
Next
End Sub

3. 按下 F5 以執行此巨集，系統將彈出對話方塊，供您選取目標儲存格，其數值將顯示於每個工作表的頁尾。

用於選取要將其內容插入頁尾的儲存格之對話框

4. 選取儲存格並按一下確定後，該儲存格的數值就會自動插入至活頁簿中每個工作表的頁尾左側。您可前往檔案> 列印，立即檢查頁尾設定！
儲存格值已插入頁尾

注意事項：

若要在所有工作表的頁首中使用儲存格的數值，請改用下列程式碼。輸入與執行程式碼的步驟完全相同：

VBA 程式碼：將指定儲存格數值放入所有工作表的頁首

Sub AddHeaderToAll()
'Update 20140318
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection.Range("A1")
Set WorkRng = Application.InputBox("Range (single cell)", xTitleId, WorkRng.Address, Type:=8)
For Each ws In Application.ActiveWorkbook.Worksheets
    ws.PageSetup.LeftHeader = WorkRng.Range("A1").Value
Next
End Sub

若要在頁首／頁尾的中央或右側插入數值，只需將程式碼中的 LeftHeader/LeftFooter 替換為 CenterHeader/CenterFooter 或 RightHeader/RightFooter 即可。
請注意，透過 VBA 巨集所做的變更無法復原。為避免資料遺失，若結果不如預期，請務必事先儲存文件。
此方法最適合用於所有工作表皆需使用相同頁首／頁尾的活頁簿。若各工作表需套用不同內容，建議針對每個工作表分別執行單一工作表巨集。
若頁首／頁尾未如預期更新，請確認您未啟用「保護工作表」或「活頁簿保護」功能。

使用 Kutools for Excel 將插入文檔信息插入頁首／頁尾

當您在頁首或頁尾中快速且靈活地插入與檔案相關的資訊（例如工作表名稱、工作簿名稱或檔案路徑）時，Kutools for Excel 提供了一個專用工具——「插入工作簿資訊」。若您偏好無需撰寫程式碼的解決方案、需要批次處理，或希望在不手動輸入、避免錯誤風險的情況下插入多項內建文件屬性，此工具尤其適合！即使不熟悉 VBA，或需定期根據活頁簿中繼資料更新頁首／頁尾，也能透過 Kutools 輕鬆完成作業，省時又可靠。

Kutools for Excel 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

安裝免費版 Kutools for Excel 後，請依照下列步驟操作：

1. 前往 KUTOOLS PLUS 選項卡，點選活頁簿 > 插入工作簿資訊。
功能區上 Kutools 索引標籤中的「插入活頁簿資訊」選項

2. 在插入工作簿資訊對話方塊中，於資訊區段下選取您要插入的特定資訊（例如工作簿路徑、檔案名稱、工作表名稱等），並透過勾選頁首或頁尾，指定將其插入至頁首或頁尾。

提示：您可以運用位置選項，將內容精準置於頁首或頁尾的左側、置中或右側，打造更清晰的版面結構！例如：將檔案路徑放在左側，工作表名稱置中顯示，讓文件專業又易讀。
「插入活頁簿資訊」對話框

3. 按一下確定以套用您的設定。若要檢視結果，請前往檢視 > 版面配置，或使用檔案 > 列印預覽。
已插入檔案資訊的頁首

透過插入工作簿資訊功能，您可直接將此類資訊插入儲存格或儲存格範圍中，輕鬆用於公式運算、內容顯示或進一步的自動化作業！立即點擊深入了解此實用工具。

此方法特別適合希望無需操作巨集或公式，就能輕鬆存取文件屬性的使用者。與手動編輯相比，Kutools 不僅確保一致性，更能大幅節省時間，尤其適合經常需要更新文件參考資料的使用者。

如果頁首或頁尾中的資訊看似未自動更新，請檢查活頁簿是否設定為「手動計算」，因為部分頁首／頁尾內容需重新整理文件，才能顯示最新資料。

手動將儲存格內容複製到頁首或頁尾對話方塊

如果您僅需偶爾以儲存格內容更新頁首或頁尾，且希望避免使用 VBA 與增益集，可複製儲存格值後，手動貼到頁首／頁尾對話方塊中。在版面配置檢視中雙擊頁首／頁尾區域，再按下 Ctrl+V 貼上儲存格值。此方法的缺點是需手動作業——每次數值變更時，都必須重新手動更新。

使用手動方式或「列印標題」功能時，請留意它們在「真正」的頁首／頁尾配置上靈活性較低，且每次基礎資訊變更都需重新操作。相較之下，VBA 巨集與 Kutools 等工具能提供更簡化、可重複的工作流程，尤其適合大型活頁簿或自動化報表生成。若您在執行 VBA 時遇到非預期行為或錯誤，務必檢查巨集安全性設定，並確認工作表是否遭到鎖定或保護。使用第三方增益集前，請確保其來源可靠且與您的 Excel 版本相容。處理敏感或重要檔案時，執行巨集前先儲存備份，是值得養成的良好習慣。

示範：插入工作簿資訊至儲存格/頁首/頁尾

Kutools for Excel：超過 300 種實用工具隨手可得！盡享 AI 驅動功能，讓工作更聰明、更快速！立即下載！

相關文章：

如何在 Excel 中將檔案名稱或路徑插入儲存格、頁首或頁尾？

如何在 Excel 中插入或刪除頁首、頁尾及頁首圖片？

最佳 Office 生產力工具

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