如何在Excel中列印下拉列表中的所有選項？

您是否曾經嘗試過在Excel工作表的下拉列表中列印所有選項？本文將介紹如何在Excel中將下拉列表中的所有選項分別列印出來。

使用VBA代碼列印下拉列表中的所有選項

使用VBA代碼列印下拉列表中的所有選項

以下VBA代碼可以幫助您列印工作表中下拉列表的所有選項。請按照以下步驟操作。

1. 按 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 視窗。

2. 在 Microsoft Visual Basic for Applications 視窗中，請點擊 插入 > 模組。然後將以下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 鍵運行代碼。

然後，指定工作表中下拉列表的所有選項將被分別列印出來。

相關文章：

• 如何在選擇Excel下拉列表中的值時自動填充其他單元格？
• 如何在Excel下拉列表中輸入時自動完成？
• 如何在Excel中創建帶有日曆的下拉列表？
• 如何在Excel中創建可搜索的下拉列表？
• 如何在Excel中創建允許多選或多重值的下拉列表？