資料結構
網路
關係資料庫管理系統
作業系統
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 語言程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP
物理學
化學
生物學
數學
英語
經濟學
心理學
社會學
時尚研究
法律研究如何在 Excel 中將行重複列印在每個頁面頂部（最後一頁除外）？
當您擁有跨越多個頁面的海量資料集，並希望確保重要資訊始終顯示在每個頁面的頂部以提高可讀性和上下文時，此便捷的 Excel 工具將非常有用。在本影片中，我們將逐步指導您完成在 Excel 中設定行重複以使其顯示在每個列印輸出頂部的每個步驟。
學習這個技巧一定會增強 Excel 文件的整體演示和實用性，無論您是在處理財務報表、資料表還是任何其他包含多個頁面的電子表格。因此，讓我們開始學習如何掌握這個實用功能，以提高 Excel 列印的質量和資訊！
將行重複列印在每個頁面頂部（最後一頁除外）
在這裡，我們將首先建立一個 VBA 模組，然後選擇單元格範圍來完成任務。讓我們看看一個簡單的過程，瞭解如何在 Excel 中將行重複列印在每個頁面頂部（最後一頁除外）。
步驟 1
考慮一個 Excel 工作表，其中工作表中的資料類似於下圖。
首先，右鍵單擊工作表名稱並選擇“檢視程式碼”以開啟 VBA 應用程式。
右鍵單擊 > 檢視程式碼。
步驟 2
然後單擊“插入”並選擇“模組”，然後將以下程式碼複製到文字框中。
插入 > 模組 > 複製。
程式碼
Sub RepeatRowsExceptLastPage()
Dim xPages As Long, I As Integer, xRg As Range
On Error Resume Next
xPages = ActiveSheet.PageSetup.Pages.Count
Set xRg = Application.InputBox("Please select a row you need to repeat:", "Repeat Rows Except", , , , , , Type:=8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
If xPages > 0 Then
With ActiveSheet.PageSetup
.PrintTitleRows = xRg.AddressLocal
ActiveSheet.PrintOut from:=1, To:=xPages - 1
.PrintTitleRows = ""
ActiveSheet.PrintOut from:=xPages, To:=xPages
End With
End If
End Sub
步驟 3
然後單擊 F5 執行模組。然後選擇單元格範圍並單擊“確定”以完成任務。
F5 > 選擇單元格 > 確定
然後您將看到所有頁面都打印出來，某些行重複出現在頂部，但最後一頁除外。
結論
在本教程中，我們使用了一個簡單的示例來演示如何在 Excel 中將行重複列印在每個頁面頂部（最後一頁除外），以突出顯示特定資料集。
更新於： 2023年9月27日
600 次檢視
廣告