VBA-Excel如何清除combobox项目

我有一个combobox有3个项目作为“select”,“杰克”和“吉尔”。 私人小组Workbook_Open()下我保留下面的代码行。

With ThisWorkbook.Sheets("Sheet1").ComboBox1 Items.Clear .AddItem "Select" .AddItem "Jack" .AddItem "Jill" End With 

当我select一个项目,并closuresExcel。 下次如果我打开Excel的默认comboBox显示以前select的项目。 但我想显示select作为默认项目。

你需要删除Items.Clear应该是.Clear ,然后使用.SelText属性来设置选定的文本

 With ThisWorkbook.Sheets("Sheet1").ComboBox1 .Clear .AddItem "Select" .AddItem "Jack" .AddItem "Jill" .SelText = "Select" End With