vba - Excel - 通过 VBA 显示 ComboBox DropDown

Question

我需要一个工作簿来在打开时显示组合框列表下拉菜单。

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

似乎无法找到相关的属性。

Answer 1

如果您使用的是 ActiveX 控件，请参阅下面的内容，否则，如果您使用的是表单控件，则如果您希望通过代码进行下拉，请将它们替换为 ActiveX 控件。下面的代码适用于表单和工作表中的 ActiveX 控件。如果控件在工作表上，则更改 ComboBox1.SetFocus至ComboBox1.Activate
我能想到的两种方法...

使用简单的命令

久经考验

Private Sub CommandButton1_Click()
   ComboBox1.DropDown
End Sub

使用发送键。如果使用不当，Sendkeys 是不可靠的。

久经考验

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

屏幕截图