Userform组合框Excel VBA

时间:2016-02-08 14:55:49

标签: excel vba combobox userform

有点烦人,因为我已经尝试了到目前为止我读过的所有建议,但我似乎无法通过VBA填充我的用户表单组合框。

我尝试过以下方法,除了我之外,似乎对所有人都有效....

 Me.Weeks.List = Array("30", "36", "40")

和....

 With Weeks
     .AddItem "30"
     .AddItem "36"
     .AddItem "40"
 End With

到目前为止,当我运行它时,userform中没有显示任何内容。我缺少一个设置吗?当然这些都是初始化事件的一部分。 :)

每条请求更多代码:

 Private Sub ToolBoxForm_Initialize()

Weeks.Clear
'MORE STUFF

Me.MinAYWeeks.List = Array("30", "36", "40")

'With MinAYWeeks
'    .AddItem "30"
'    .AddItem "36"
'    .AddItem "40"
'End With

'MORE STUFF

 End Sub

还有使用OK按钮进行计算的东西,但没有任何影响组合框内容的东西,只是引用所选选项值的东西。

先谢谢你们

enter image description here

1 个答案:

答案 0 :(得分:2)

在你的userform initialize事件中添加代码,但添加对userform的引用(Me.Weeks)。

With Me.Weeks
 .AddItem "30"
 .AddItem "36"
 .AddItem "40"
End With

enter image description here