Tag: autocomplete

combobox中的VBA自动填充文本

我正在创build一个comboboxsearch工作表使用工作表名称自动完成function，我可以得到的下拉列表中的工作簿的工作表的名称，但是当我input工作表名称的几个字母，我想显示的build议所有的表格中都有我写在combobox中的字母。 下面是到现在为止所做的代码，我可以select表单名称并将其添加到表单中。 第一个 – 添加一个combobox到第一个工作表并命名（我称之为cmbSheet）。 我使用了ActiveXcombobox（在Excel 2007中，在“开发人员”选项卡下）。 第二 – 打开VBA，并将下面的代码添加到工作簿代码。 每次打开工作簿时，此代码将使用工作表名称填充combobox。 Private Sub Workbook_Open() Dim oSheet As Excel.Worksheet Dim oCmbBox As MSForms.ComboBox Set oCmbBox = ActiveWorkbook.Sheets(1).cmbSheet oCmbBox.Clear For Each oSheet In ActiveWorkbook.Sheets oCmbBox.AddItem oSheet.Name Next oSheet End Sub 第三 – 现在，我去了我的第一个工作表的代码（已添加combobox），并添加将激活combobox中select的工作表的代码。 代码是： Private Sub cmbSheet_Change() ActiveWorkbook.Sheets(cmbSheet.Value).Activate End Sub 现在，当combobox值改变时，相应的纸张被激活。