2

我有一个包含 3 个项目的 ComboBox,分别是“Select”、“Jack”和“Jill”。在Private Sub Workbook_Open()下,我保留了以下代码行。

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

每当我选择一个项目并关闭 Excel 时。下次如果我默认打开 excel 组合框,显示先前选择的项目。但我想将选择显示为默认项目。

4

1 回答 1

15

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

With ThisWorkbook.Sheets("Sheet1").ComboBox1
    .Clear
    .AddItem "Select"
    .AddItem "Jack"
    .AddItem "Jill"
    .SelText = "Select"
End With
于 2013-01-08T07:54:07.263 回答