VBA ComboBox不显示值

时间:2015-04-01 16:26:29

标签: excel vba excel-vba combobox

尝试将ComboBox与VBA一起使用,当您单击向下箭头时,它只显示1个空行。我以前从未使用过ComboBox,而且仍然是VBA的初学者。

Private Sub ComboBoxT_Change()
     ComboBoxT.AddItem "apple"
     ComboBoxT.AddItem "orange"
     ComboBoxT.AddItem "banana"
End Sub

2 个答案:

答案 0 :(得分:0)

只有在ComboBox发生更改时,才会触发您选择将项目添加到ComboBox的事件。您需要输入这段代码,以便在您想要使用ComboBox之前在另一个事件中向ComboBox添加新项目。

大多数情况下,它是在Form_Load事件中完成的,因此在完全加载表单时,您可以在ComboBox中使用这些项目。

尝试以下

Private Sub Form_Load()
     ComboBoxT.AddItem "apple"
     ComboBoxT.AddItem "orange"
     ComboBoxT.AddItem "banana"
End Sub

答案 1 :(得分:0)

就像Saagar所说的那样,他们认为代码当前是编写的,如果组合框中有变化,它只会将项目添加到组合框中。我将使用的代码如下所示:

Private Sub UserFormName_Activate()
   ComboBoxT.AddItem "apple"
   ComboBoxT.AddItem "orange"
   ComboBoxT.AddItem "banana"
end sub

实现此目的的最简单方法是在用户表单创建器中,双击userform框架。这应显示您将使用的代码,然后从顶部下拉栏(第一个可能会说" UserForm"或" General")您可以选择" Userform& #34;在第一个和"激活"在第二个。这应该是一个很好的起点,你想要添加到ComboBox的项目应该就在那里,准备好了。希望这会有所帮助:)