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.