Excel - 通过VBA显示ComboBox DropDown

Question

我需要一个工作簿才能在打开时显示Combobox列表下拉列表。

工作簿中的组合框是一个表单控件，因此是一个形状。

似乎无法找到相关的财产。

Answer 1

如果您正在使用ActiveX控件，请参阅下面的内容，否则，如果您使用的是表单控件，则将其替换为ActiveX控件（如果您希望通过代码进行下拉菜单）。下面的代码适用于表单和工作表中的ActiveX控件。如果控件位于工作表上，则将ComboBox1.SetFocus更改为ComboBox1.Activate

我能想到的两种方式......

• 使用简单的命令

尝试并经过测试

Private Sub CommandButton1_Click()
   ComboBox1.DropDown
End Sub

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

尝试并经过测试

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

<强>截图

Answer 2

我有很多崩溃与.dropdown但是找到了一些成功 SendKeys ......

Answer 3

我认为最好 UserForm组合框如Siddharth Rout所示    ComboBox1.SetFocus    SendKeys＆＃34;％{Down}＆＃34;

表示工作表上的一些组合框    CB.DropDown就够了   ..正如他们没有setfocus或激活