1

私はExcel2010を使用しています。

シートのコンボボックスの内容をクリアしたいのですが（選択されていないときのようにクリアして空白にします）、選択してクリアする方法がわかりません。私はこのようなコンボボックスを選択しようとしました：

Sheet1.ComboBox1.Clear

ただし、Sheet1オブジェクトの下には「ComboBox」はありません。私のコンボボックスを選択する唯一の方法はこれを使用することです：

Sheet1.Shapes("Drop Down 24")

コンテンツを選択してクリアする方法がわかりません。誰か助けてもらえますか？

4

4 に答える 4

1

どうですか

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

私はあなたが実際にあなたのコントロールの表示された値を空白にしたいと思っていると思います。その場合、ドロップダウンオブジェクトの場合、指定したように、次のようにします。

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

ここで、0は、リストから選択されている要素を示します。IEなし。

それが機能しない場合は、おそらく実際にComboBoxを扱っていることになります。その場合は、次のように使用します。

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

このコードはExcel2003（このマシンにあるもの）で作成およびテストされているため、実際のオブジェクトに到達するまでのパスはExcel2010ではわずかに異なる場合があります。）

于 2012-10-30T03:11:53.017 に答える
1

自閉症のプログラマーとして、私はむしろこの方法を好みます。それは、シート上の優れた「範囲メモリの選択」に依存しません。

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 に答える
0

ドロップダウンリストを空白のセルにリセットしますが、将来の使用のためにリストを維持します。

セルをクリアするマクロを作成します。記録中にセルを選択し、「内容をクリア」を選択するだけです。これにより、選択範囲が空白のセルに設定されますが、ドロップダウンリストはそのまま残ります。

たとえば、次のようになります。

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