在没有代码的情况下将项目添加到组合框?

时间:2010-06-08 13:52:51

标签: vba combobox

我想在我的组合框中使用一些默认值,但似乎无法在不编写填充组合框的模块的情况下弄清楚如何执行此操作。如何手动填写组合框,这样我就不必使用代码来做这么简单的事情了。

由于

4 个答案:

答案 0 :(得分:2)

你在用什么节目?组合框在哪里。例如,在Excel中,您可以在表单或工作表上使用组合框,答案将取决于这些因素。

在Excel中,您可以在工作表中定义默认值(如果需要,可以隐藏),并将组合框源设置为相应的范围 - 无需代码。

请详细说明您的要求,您将获得更具体的答案。

答案 1 :(得分:1)

如果我理解你的问题是正确的,我很确定你必须在某个地方有代码,我不认为VBA支持,因为我似乎记得VB6只是在一个属性中添加项目,但你不要必须创建一个单独的模块,这样的东西应该工作:

Private Sub UserForm_Activate()
    ComboBox1.AddItem "Text1"
    ComboBox1.AddItem "Text2"
    ComboBox1.AddItem "Text3"
End Sub

答案 2 :(得分:1)

我猜你说的是Access?如果是这样的话,

  • 将行来源类型设置为“值列表”
  • 然后将行源设置为黑色;蓝色;绿色或任何你想要的东西

答案 3 :(得分:0)

您也可以尝试类似

的内容

Private Sub worksheet_Activate()

使用Sheet1.ComboBox1  .List =范围(" a1:a20")。值 结束 '这将给出从单元格A1到单元格A20的值的列表 结束子