使用Array来设置组合框

Question

我在Excel中使用Userforms时遇到了这个小问题。

我有一个组合框列表，它们都需要在相同的数据中，日期和月份。

Sub Userform_Initialize()
Dim arr(31) As Variant
Dim arr2(12) As Variant
Dim i As Integer
For i = 1 To 31
    arr(i) = i
Next
ComboBox1.list = arr()

For i = 1 To 12
    arr2(i) = i
Next
ComboBox2.list = arr2()
End Sub

一切正常。但是，我希望代码能够重复我所拥有的所有组合框。让我们说它们被称为ComboBox1 .. Combobox10。我尝试过以下操作，但没有工作，但我对VBA中这些部分的工作原理并不十分了解。

Dim Comboboxes(10) as Variant / Object / String (I have tried all)
Comboboxes(1) = Combobox1 / "Combobox1" (I have tried both)
...
Comboboxes(10) = Combobox10

For i = 1 To 31
    arr(i) = i
Next
Comboboxes(1).list = arr()

显然我还需要为组合框设置一个i循环，但它不起作用。是不可能或我做错了什么？