我可以更改 Excel VBA combobox.list 范圍嗎？

Question

Excel VBA 中是否有任何選項允許我更改 combobox 的范圍？ 查看示例

我想更改 Variant/Variant 中的數字 5（0 到 3、0 到 5）。

Combobox 填充了這個代碼：

Private Sub UserForm_Activate()

Dim x As Range
    With Worksheets("Distributori")
      Set x = .Range("A2", .Range("F1000").End(xlUp))
End With

ComboBox1.RowSource = "Distributori!" & x.Address
ComboBox1.ListIndex = 0
Me.ComboBox1.TextColumn = 2

結束子

Answer 1

請嘗試下一個（改編的）代碼：

Dim x As Range, arrList As Variant
    With Worksheets("Distributori")
      Set x = .Range("A2", .Range("F1000").End(xlUp))
    End With
    arrList = x.Value
    With ComboBox1
        .ColumnCount = 6
        .list = arrList
        .ListIndex = 0
        .TextColumn = 2
    End With