Excel – 通过VBA显示comboboxDropDown

我需要一个工作簿来打开时显示combobox列表下拉列表。

工作簿中的combobox是一个表单控件，所以是一个形状。

似乎无法find相关的属性。

Answer 1

如果您使用的是ActiveX控件，那么请参阅下面的内容，否则，如果您使用的是表单控件，那么如果您希望通过代码实现下拉菜单，请将其replace为ActiveX控件。 下面的代码将适用于表单以及工作表中的ActiveX控件。 如果该控件在工作表上，则将ComboBox1.SetFocus更改为ComboBox1.Activate

我可以想到的两种方法…

• 使用一个简单的命令

尝试和testing

 Private Sub CommandButton1_Click() ComboBox1.DropDown End Sub 

• 使用Sendkeys。 如果使用不当，Sendkeys是不可靠的。

尝试和testing

 Private Sub CommandButton1_Click() ComboBox1.SetFocus SendKeys "%{Down}" End Sub 

SCREENSHOTS

Answer 2

我已经有很多与.dropdown崩溃，但与SendKeysfind一些成功…

Answer 3

我认为最好的UserFormcombobox是由上述Siddharth Rout ComboBox1.SetFocus SendKeys“％{Down}”

为工作表上的一些comboboxCB.DropDown就够了。就像他们没有setfocus或激活