KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何在 Excel 中列印下拉清單的全部選項?

作者Siluvia修改日期

當您在 Excel 中使用下拉列表時,可能會需要快速列印該清單中的所有選項。這在文件記錄、審查、培訓,或與同事規劃資料輸入(需提供所有可能選項的紙本)時特別實用。雖然 Excel 未內建可自動列印所有下拉選項的功能,但仍有幾種實用方法可供選擇。本文將介紹一種基於 VBA 的解決方案,以及一種適合大多數使用者的手動方法,並提供疑難排解提示與實用建議,讓您的工作流程更加順暢。


使用 VBA 程式碼列印下拉清單中的所有選項

若您的下拉式清單是基於資料驗證或表單控制項,且希望自動將每個選項分別列印出來(例如檢視選取不同選項後工作表的外觀),使用 VBA 是最有效率的方法。當您擁有依賴下拉選項的資料或計算結果,並需要為每種情境提供紙本輸出時,此方法尤其適用。請仔細遵循以下步驟,以避免常見錯誤:

1. 按下 Alt+F11 鍵,即可開啟 Microsoft Visual Basic for Applications 視窗。若此快捷鍵無效,請確認您的鍵盤快捷鍵已啟用,且 Office 安裝中包含 VBA 元件。

2. 在 Microsoft Visual Basic for Applications 視窗中,點選插入 模組,並將下方的 VBA 程式碼複製貼上至開啟的模組視窗中。請參閱截圖:

將 VBA 程式碼複製並貼上到模組中

VBA 程式碼:將指定下拉列表中的所有選項分別列印成獨立輸出

Sub Iterate_Through_data_Validation()
    Dim xRg As Range
    Dim xCell As Range
    Dim xRgVList As Range
    Set xRg = Worksheets("Sheet1").Range("B8")
    Set xRgVList = Evaluate(xRg.Validation.Formula1)
    For Each xCell In xRgVList
        xRg = xCell.Value
        ActiveSheet.PrintOut
    Next
End Sub

注意:在程式碼中,Sheet1 設定為包含您要列印之下拉列表的工作表名稱,而 B8 則是含有下拉清單的特定儲存格。請務必將這些參照替換為您實際使用的工作表名稱與儲存格位置,以免因參照錯誤導致異常或非預期結果!

3. 將程式碼置入後,按下 F5 鍵,或點選執行按鈕以執行巨集。此操作將逐一循環處理下拉式清單中的每個值,自動更新指定儲存格,並為每個項目送出獨立的列印作業。若選項眾多,處理時間可能較長,且您的印表機設定(如預設印表機與列印份數)將一併套用。

若出現「Subscript out of range」等錯誤,或儲存格更新有誤,請再次確認您的工作表名稱與下拉清單的儲存格參照,並確保所使用的下拉類型(資料驗證或表單控制項)彼此相容。

當每次選取都會觸發工作簿中其他部分的大量計算或格式變更,且您需要列印呈現每種情境的結果時,此方法尤為適用。其缺點在於,若下拉清單來源包含極長的選項,巨集執行時間可能較久,並迅速啟動多項列印作業。執行巨集前,務必確認您的列印設定,以免造成不必要的紙張浪費。


透過直接列出下拉清單源數據來列印所有選項

在許多情況下,您的下拉式清單是根據某個儲存格範圍或手動輸入的項目清單所建立,這些內容早已顯示於工作表中,或能輕鬆還原。若您只需列印所有可用選項的清單(而非針對每種選項狀態分別列印完整的工作表),可採用以下簡便方法,無需使用 VBA 或進階功能。

適用情境:此解決方案適用於以下情況:您的下拉列表以儲存格範圍作為來源資料,或在「資料驗證」對話方塊中直接輸入逗號分隔的選項清單。同時也非常適合快速提供團隊成員或利害關係人一份清晰的選項參考清單!

優點:無需巨集、降低產生多項列印作業的風險,且在來源清單管理完善時可立即完成。

限制:此方法無法重現選取每個下拉選項時的完整工作表效果,僅會列印所有可能值的清單。

步驟:

若您的下拉清單基於儲存格範圍(例如選項位於 A1:A10):

  • 前往工作表,並找出作為下拉清單來源的範圍。該範圍設定於「資料驗證」中—通常可在「資料」>「資料驗證」>「來源」欄位找到。
  • 使用滑鼠選取整個來源區域(例如 A1:A10)。
  • 按下 Ctrl+P,或前往檔案 > 列印
  • 在列印設定中,若您只想列印清單而非整張工作表,請務必選擇「打印選區」。
  • 請先檢查列印預覽,確認所選內容如預期顯示後,再列印該清單。

若您的下拉清單使用手動輸入的清單(例如「Apple,Banana,Orange」):

  • 在您的工作表中,選取一個空白欄位,並逐項輸入項目,每個項目各佔一列(例如:B1 輸入「Apple」,B2 輸入「Banana」等)。
  • 或者,您也可以透過「資料驗證」對話方塊檢視清單,從「來源」欄位複製內容,並以數值形式貼到某一欄中。
  • 一旦整份清單都已填入該欄位,請依照上述步驟列印所選範圍。

額外提示:若您有超長的逗號分隔清單,想拆分成獨立儲存格以便列印,可使用資料> 文字分列 功能,以逗號作為分隔符號。

此手動方法最適合用於靜態且長度為短至中等的清單。若清單經常變動,或您經常需要為每個選項列印完整的工作表版本,建議如前所述,透過 VBA 進行自動化處理。

疑難排解與額外提示:

  • 若下拉式清單的來源位於其他工作表或處於隱藏狀態,您可能需要先取消隱藏該工作表,或檢查用來建立動態範圍的公式。
  • 在執行任何會觸發多項列印作業的 VBA 程式碼前,務必先透過列印預覽確認即將使用的印表機,尤其是在正式列印之前。
  • 對於由公式驅動的下拉式清單(例如以動態陣列作為來源),建議先將目前可見的項目複製並貼到新欄位中,再進行列印。
  • 請留意,列印過長的清單將大量耗用紙張與墨水。務必先查看列印預覽,依需求調整設定,避免不必要的浪費。
  • 若您無需直接列印,僅需匯出清單,也可將清單複製並貼上至其他應用程式(如 Word、記事本等),以便調整格式或分享。

總結建議:若您需反覆列印下拉選單,建議在工作簿中規劃專屬的來源清單區域並清楚標示,以節省寶貴時間。若您經常需要針對不同情境列印工作表,請務必保持 VBA 巨集為最新狀態,並於執行前檢查所有參照。定期檢視您的下拉來源(特別是在工作簿變更或更新後),以確保持續準確、操作便利!


在 Excel 中輕鬆批量打印指定頁當前工作表:

透過列印特定頁面功能(屬於 )Kutools for Excel),您可輕鬆批量列印目前工作表中的指定頁面,例如:列印所有奇數頁、所有偶數頁、僅列印目前頁面,或如圖所示自訂頁面範圍進行列印。
立即下載試用!(提供 30 天免費試用)

使用 Kutools 列印目前工作表中的指定頁面


相關文章:


最佳 Office 生產力工具

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

運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……


Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!

  • 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
  • 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
  • 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!

所有 Kutools 增益集,一個安裝程式

Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!

ExcelWordOutlookTabsPowerPoint
  • 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
  • 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
  • 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
  • 30 天完整功能試用— 無需註冊,無需信用卡
  • 超值之選— 比單獨購買各增益集更省費用