如何在打開的工作簿上用指定的數據填充組合框？

通常，您可以透過在組合框屬性的 ListFillRange 欄位中輸入儲存格引用，以特定範圍的儲存格資料填入組合方塊（ActiveX 控制項）。如果您想直接使用指定的資料填充組合框，而不手動調整其屬性，本文中描述的方法可以提供協助。

使用VBA代碼填充具有指定數據的組合框

使用VBA代碼填充具有指定數據的組合框

此方法可以幫助您在打開工作簿時直接用指定的數據填充組合框。 請執行以下操作。

1。 按 其他 + F11 同時打開 Microsoft Visual Basic for Applications 窗口。

2。 在裡面 Microsoft Visual Basic for Applications 窗口，雙擊 的ThisWorkbook 在左窗格中打開 的ThisWorkbook 代碼編輯器。 然後將下面的VBA代碼複製到其中。 看截圖：

VBA代碼：在工作簿打開時用指定的數據填充一個組合框

Private Sub Workbook_Open()
'Updated by Extendoffice 2018/1/30
    With Sheet1.ComboBox1
        .Clear
        .AddItem "Select a Fruit"
        .AddItem "Apple"
        .AddItem "Banana"
        .AddItem "Peach"
        .AddItem "Pineapple"
        .AddItem "Watermelon"
        .Text = .List(0)
    End With
End Sub

筆記:

3. 將工作簿另存為 Excel啟用宏的工作簿 格式化並關閉它。

4. 重新開啟工作簿，您將看到組合方塊已填入了指定的數據，如下圖所示：

相關文章：

• 如何將組合框值複製到Excel中的活動單元格？
• 如何在Excel中的組合框輸出中顯示日期格式？
• 如何防止或禁用在Excel中的組合框中鍵入？
• 如何在Excel中使用命名範圍數據填充組合框？