尝试自动完成ActiveXcombobox时Excel崩溃

我有一个工作表上的ActiveX组合_Change控件，这是_Change事件代码

 Private Sub ComboBox1_Change() Me.ComboBox1.ListFillRange = "ItemSearch" Me.ComboBox1.DropDown End Sub 

当我使用键盘上/下键移动列表时，它会自动退出Excel。

有谁知道这个问题的解决scheme？ 我基本上想要一个dynamic的combobox。

Answer 1

当您更改所选选项时，您正在强制Combobox的可能值更新，
这就是为什么它崩溃。

您可以尝试在该事件中保留Me.ComboBox1.DropDown 。

但是.ListFillRange应该在另一个事件中：

• Workbook_Open
• Workbook_SheetChange
• Worksheet_SelectionChange
• Worksheet_Change

---

如果您尝试使用某种自动完成行为 ，则可以使用内置属性 ：

1. 用鼠标右键单击该控件，单击属性
2. 在打开的属性窗口中，findMatchEntry属性
3. 将其设置为0 - fmMatchEntryFirstLetter