Partager via


Méthode CommandBarComboBox.SetFocus (Office)

Déplace le focus du clavier vers le contrôle CommandBarComboBox spécifié. Si le contrôle est désactivé ou s'il n'est pas visible, cette méthode échoue.

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. SetFocus

Expression Variable qui représente un objet CommandBarComboBox .

Exemple

Cet exemple crée une barre de commandes nommée Custom et y ajoute un contrôle ComboBox et un contrôle Button . Il montre ensuite comment utiliser la méthode SetFocus pour placer le focus sur le contrôle ComboBox.

Set focusBar = CommandBars.Add(Name:="Custom") 
With CommandBars("Custom") 
    .Visible = True  
    .Position = msoBarTop 
End With 
 
Set testComboBox = CommandBars("Custom").Controls _ 
    .Add(Type:=msoControlComboBox, ID:=1) 
With testComboBox 
    .AddItem "First Item", 1 
    .AddItem "Second Item", 2 
End With 
Set testButton = CommandBars("Custom").Controls _ 
    .Add(Type:=msoControlButton) 
testButton.FaceId = 17 
' Set the focus to the combo box. 
testComboBox.SetFocus

Voir aussi

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.