Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Dav
Bonjour/soir MILANDS
Ceci devrait faire l'affaire _________________ Sub NouvBarreOutil()
With Application.CommandBars.Add("BarrePerso", , , True) With .Controls.Add(msoControlButton) .Caption = "MonBouton" .Style = msoButtonCaption End With .Visible = True End With End Sub _________________ Dans Excel 2007 tu verras apparaitre un nouvel onglet dans le bandeau avec le nom "Compléments"
Dis nous si cela te convient.
Dav
"MILANDS" a écrit dans le message de groupe de discussion :
Bonjour, comment introduire un bouton dans une barre d'outils personnalisée assorti d'un texte à la place de l'icône ?
Bonjour/soir MILANDS
Ceci devrait faire l'affaire
_________________
Sub NouvBarreOutil()
With Application.CommandBars.Add("BarrePerso", , , True)
With .Controls.Add(msoControlButton)
.Caption = "MonBouton"
.Style = msoButtonCaption
End With
.Visible = True
End With
End Sub
_________________
Dans Excel 2007 tu verras apparaitre un nouvel onglet dans le bandeau avec
le nom "Compléments"
Dis nous si cela te convient.
Dav
"MILANDS" <michel.landsberg@wanadoo.fr> a écrit dans le message de groupe de
discussion : eSfnJAIrIHA.2208@TK2MSFTNGP04.phx.gbl...
Bonjour, comment introduire un bouton dans une barre d'outils
personnalisée assorti d'un texte à la place de l'icône ?
Ceci devrait faire l'affaire _________________ Sub NouvBarreOutil()
With Application.CommandBars.Add("BarrePerso", , , True) With .Controls.Add(msoControlButton) .Caption = "MonBouton" .Style = msoButtonCaption End With .Visible = True End With End Sub _________________ Dans Excel 2007 tu verras apparaitre un nouvel onglet dans le bandeau avec le nom "Compléments"
Dis nous si cela te convient.
Dav
"MILANDS" a écrit dans le message de groupe de discussion :
Bonjour, comment introduire un bouton dans une barre d'outils personnalisée assorti d'un texte à la place de l'icône ?
Rouch
Dav a formulé ce vendredi :
Bonjour/soir MILANDS
Ceci devrait faire l'affaire _________________ Sub NouvBarreOutil()
With Application.CommandBars.Add("BarrePerso", , , True) With .Controls.Add(msoControlButton) .Caption = "MonBouton" .Style = msoButtonCaption End With .Visible = True End With End Sub _________________ Dans Excel 2007 tu verras apparaitre un nouvel onglet dans le bandeau avec le nom "Compléments"
Dis nous si cela te convient.
Dav
"MILANDS" a écrit dans le message de groupe de discussion :
Bonjour, comment introduire un bouton dans une barre d'outils personnalisée assorti d'un texte à la place de l'icône ?
Bonjour, Je dérive un peu du sujet initial ;-) mais, j'ai un classeur de macro personnelles avec des barres personnalisées (Je me suis amusé en XML ...) mais comment faire pour qu'elle soit affichée pour tous les classeurs et pas seulement quand c'est mon classeur qui est actif..
Dav a formulé ce vendredi :
Bonjour/soir MILANDS
Ceci devrait faire l'affaire
_________________
Sub NouvBarreOutil()
With Application.CommandBars.Add("BarrePerso", , , True)
With .Controls.Add(msoControlButton)
.Caption = "MonBouton"
.Style = msoButtonCaption
End With
.Visible = True
End With
End Sub
_________________
Dans Excel 2007 tu verras apparaitre un nouvel onglet dans le bandeau avec le
nom "Compléments"
Dis nous si cela te convient.
Dav
"MILANDS" <michel.landsberg@wanadoo.fr> a écrit dans le message de groupe de
discussion : eSfnJAIrIHA.2208@TK2MSFTNGP04.phx.gbl...
Bonjour, comment introduire un bouton dans une barre d'outils personnalisée
assorti d'un texte à la place de l'icône ?
Bonjour,
Je dérive un peu du sujet initial ;-) mais, j'ai un classeur de macro
personnelles avec des barres personnalisées (Je me suis amusé en XML
...) mais comment faire pour qu'elle soit affichée pour tous les
classeurs et pas seulement quand c'est mon classeur qui est actif..
Ceci devrait faire l'affaire _________________ Sub NouvBarreOutil()
With Application.CommandBars.Add("BarrePerso", , , True) With .Controls.Add(msoControlButton) .Caption = "MonBouton" .Style = msoButtonCaption End With .Visible = True End With End Sub _________________ Dans Excel 2007 tu verras apparaitre un nouvel onglet dans le bandeau avec le nom "Compléments"
Dis nous si cela te convient.
Dav
"MILANDS" a écrit dans le message de groupe de discussion :
Bonjour, comment introduire un bouton dans une barre d'outils personnalisée assorti d'un texte à la place de l'icône ?
Bonjour, Je dérive un peu du sujet initial ;-) mais, j'ai un classeur de macro personnelles avec des barres personnalisées (Je me suis amusé en XML ...) mais comment faire pour qu'elle soit affichée pour tous les classeurs et pas seulement quand c'est mon classeur qui est actif..