我正在尝试在VBA中创建,放置和填充ComboBox的元素。我不了解自己所缺少的内容,但是我无法弄清楚该怎么做。我的API中没有MSForms(即我无法编写Dim someComboBox As MSForms.ComboBox,因为它失败了。是否可以通过某种方式导入它?有人可以向我指出正确的方向吗?

我想要实现的是,当用户单击按钮时,会创建一个包含各种项目(组合框,单选按钮等)的新表单,因此我想以编程方式执行此操作。

最佳答案

您可以依赖以下代码:

 Set curCombo = ActiveSheet.Shapes.AddFormControl(xlDropDown, Left:=Cells(1, 1).Left, Top:=Cells(2, 1).Top, Width:=100, Height:=20)
 With curCombo
        .ControlFormat.DropDownLines = 2
        .ControlFormat.AddItem "Item 1", 1
        .ControlFormat.AddItem "item 2", 2
        .Name = "myCombo"
        .OnAction = "myCombo_Change"
 End With

10-06 01:51