Fatal编程技术网
  • excel/
  • VBA Excel如何清除组合框项

VBA Excel如何清除组合框项

excel vba

VBA Excel如何清除组合框项,excel,vba,Excel,Vba,我有一个组合框，里面有三个项目，分别是“选择”、“杰克”和“吉尔”。在私有子工作簿\u Open（）下，我保留了以下代码行 With ThisWorkbook.Sheets("Sheet1").ComboBox1 Items.Clear .AddItem "Select" .AddItem "Jack" .AddItem "Jill" End With 每当我选择一个项目并关闭excel时。下一次，如果我打开excel默认组合框，显示以前选择的项目。但是我想显示

我有一个组合框，里面有三个项目，分别是“选择”、“杰克”和“吉尔”。在私有子工作簿\u Open（）下，我保留了以下代码行

With ThisWorkbook.Sheets("Sheet1").ComboBox1
    Items.Clear
    .AddItem "Select"
    .AddItem "Jack"
    .AddItem "Jill"
End With
每当我选择一个项目并关闭excel时。下一次，如果我打开excel默认组合框，显示以前选择的项目。但是我想显示选择作为默认项。

您需要删除
项。清除
应该只是
。清除
，然后使用
.SelText
属性设置所选文本


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



您需要删除
项。清除
应该是
.Clear
，然后使用
.SelText
属性设置所选文本


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