VBA-Excel如何清除组合框项目

Posted 2023-05-07

【中文标题】VBA-Excel如何清除组合框项目

【英文标题】：VBA-Excel How to clear ComboBox Items

【发布时间】：2013-01-08 06:28:19

【问题描述】：

我有一个包含 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 组合框，显示先前选择的项目。但我想将 select 显示为默认项目。

【参考方案1】：

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

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