Propriété CommandBarControl.Tag (Office)

Article
04/07/2023

Cette propriété obtient ou définit des informations relatives à l'objet CommandBarControl, par exemple des informations caractérisant le contrôle ou les données qu'il est possible d'utiliser en tant qu'arguments dans des procédures. Lecture-écriture.

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. Étiquette

Expression Variable qui représente un objet CommandBarControl .

Valeur renvoyée

String

Exemple

Pour éviter les appels en double de la même classe lorsqu’ils sont déclenchés avec des événements, définissez la propriété Tag propre aux événements. L'exemple suivant illustre ce concept par le biais de deux modules.

Public WithEvents oBtn As CommandBarButton 
 
Private Sub oBtn_click(ByVal ctrl As Office.CommandBarButton, CancelDefault As Boolean) 
    MsgBox "Clicked " & ctrl.Caption 
 
End Sub 
 
Dim oBtns As New Collection 
      
Sub Use_Tag() 
     
    Dim oEvt As CBtnEvent 
    Set oBtns = Nothing 
 
    For i = 1 To 5 
        Set oEvt = New CBtnEvent 
        Set oEvt.oBtn = Application.CommandBars("Worksheet Menu Bar").Controls.Add(msoControlButton) 
        With oEvt.oBtn 
            .Caption = "Btn" & i 
            .Style = msoButtonCaption 
            .Tag = "Hello" & i 
        End With 
        oBtns.Add oEvt 
    Next 
      
End Sub

Cet exemple montre comment définir la balise du bouton de la barre de commandes personnalisée sur Bouton Orthographe et afficher la balise dans une boîte de message.

CommandBars("Custom").Controls(1).Tag = "Spelling Button" 
MsgBox (CommandBars("Custom").Controls(1).Tag)

Voir aussi

Membres de l’objet CommandBarControl

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