Méthode CommandBarComboBox.Clear (Office)

Article
04/07/2023

Supprime tous les éléments de liste dans un contrôle de zone de liste déroulante de la barre de commandes (zone de liste déroulante ou zone de liste modifiable).

Remarque

L’utilisation des barres de commandes dans certaines applications Microsoft Office a été remplacée par le nouveau composant ruban de l’interface utilisateur Microsoft Office Fluent. Pour plus d’informations, voir Vue d’ensemble du ruban Office Fluent.

Syntaxe

expression. Clair

Expression Expression qui renvoie un objet CommandBarComboBox .

Remarques

Remarque

Cette méthode échoue si elle est appliquée à un contrôle intégré de la barre de commandes (contrôle fourni avec Microsoft Office).

Exemple

Cet exemple montre comment vérifier le nombre d'éléments présents dans un contrôle de zone de liste déroulante situé dans une barre de commandes intitulée Custom Bar. Si la liste de la zone de liste déroulante comporte moins de trois éléments, la liste est effacée, un nouvel élément y est ajouté, et ce dernier est affiché en tant qu'élément par défaut de la zone de liste déroulante.

Set myBar = CommandBars("Custom Bar") 
Set myControl = myBar.Controls _ 
    Type:=msoControlComboBox) 
With myControl 
    .AddItem "First Item", 1 
    .AddItem "Second Item", 2 
End With 
If myControl.ListCount < 3 Then 
    myControl.Clear 
    myControl.AddItem Text:="New Item", Index:=1 
End If

Voir aussi

Membres de l’objet CommandBarComboBox

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Partager via