1

我正在使用excel 2010。

我想清除工作表中组合框的内容（清除为空白，就像未选择时一样），但我不知道如何选择和清除。我试图选择这样的组合框：

Sheet1.ComboBox1.Clear

但是在 Sheet1 对象下没有“组合框”。唯一选择我的组合框是使用这个：

Sheet1.Shapes("Drop Down 24")

我不知道如何选择和清除内容，有人可以帮助我吗？

4

4 回答 4

1

作为一个真正的程序员，我更喜欢这种方式。这不取决于工作表上的excel“范围内存选择”。

Set oCombo = Sheets("SheetName").Shapes("cmbComboName").ControlFormat
For I = oCombo.ListCount To 1 Step -1
    oCombo.RemoveItem (I)
Next
于 2013-08-08T20:02:17.150 回答
1

关于什么

ActiveSheet.Shapes.Range(Array("Drop Down 24")).Select
With Selection
    .ListFillRange = ""
End With
于 2012-10-29T21:50:51.807 回答
1

我假设您实际上希望将控件的显示值设为空白。在这种情况下，对于Drop Down Object，正如您所指示的那样，您将这样做：

Sheet1.Shapes("Drop Down 2").OLEFormat.Object.Value = 0

其中 0 表示选择列表中的哪个元素 IE 无。

如果这不起作用，那么您可能实际上正在处理一个 ComboBox 在这种情况下您想使用它：

Sheet1.Shapes("Drop Down 2").OLEFormat.Object.Object.Value = ""

请注意，此代码是在 Excel 2003（我在这台机器上拥有的）中创建和测试的，因此到达实际对象的路径在 Excel 2010 上可能略有不同。）

于 2012-10-30T03:11:53.017 回答
0

将下拉列表重置为空白单元格，但仍保留列表以供将来使用。

创建一个宏来清除单元格。在录制过程中，只需选择单元格并选择“清除内容”。这会将选择设置为空白单元格，但仍保留下拉列表。

例如，它看起来像这样。

Range("H3").Select
Selection.ClearContents
于 2013-02-17T19:28:28.707 回答