如何在Excel VBA中的Userform ComboBox代码中设置多个选项列表？

Question

目前我正在引用excel单元格，以便在Userform的列表中有下拉选项。我想直接从VBA中选择几个选项但不确定如何编写列表..表达式Me.ComboBox1.List = ('CIBSE','ASHRAE')不起作用。

Private Sub UserForm_Initialize()
Me.ComboBox1.List = Worksheets("ControlSetUp").Range("b25:b26").Value
'Me.ComboBox1.List = ('CIBSE','ASHRAE')
Me.ComboBox1.Value = Worksheets("ControlSetUp").Range("d15").Value
End Sub

Answer 1

Me.ComboBox1.List = Array("CIBSE", "ASHRAE")

Answer 2

Combobox1.List = Split("CIBSE,ASHRAE", ",")

也可以，甚至

Combobox1.List = Split("CIBSE ASHRAE")

使用默认的拆分分隔符，这是一个空格。