Vérifier si un bouton n'existe pas avant de le créer dans la barre d'outil
5 réponses
Fred64
Bonjour tout le monde,
J'ai une barre d'outil qui se créait automatiquement en VBA.
Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier
si le bouton n'existe pas déjà (nom identique).
J'espère avoir été clair.
Merci d'avance
Fred
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
papou
Bonjour Avec quelque chose comme ça : Dim ctr As CommandBarControl For Each ctr In Application.CommandBars(1).Controls If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then ctr.Delete End If Next ctr
Cordialement Pascal
"Fred64" a écrit dans le message de news:
Bonjour tout le monde, J'ai une barre d'outil qui se créait automatiquement en VBA. Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier si le bouton n'existe pas déjà (nom identique). J'espère avoir été clair. Merci d'avance Fred
Bonjour
Avec quelque chose comme ça :
Dim ctr As CommandBarControl
For Each ctr In Application.CommandBars(1).Controls
If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then
ctr.Delete
End If
Next ctr
Cordialement
Pascal
"Fred64" <divers.lascars@laposte.net> a écrit dans le message de news:
OEiasnSfGHA.3572@TK2MSFTNGP04.phx.gbl...
Bonjour tout le monde,
J'ai une barre d'outil qui se créait automatiquement en VBA.
Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier
si le bouton n'existe pas déjà (nom identique).
J'espère avoir été clair.
Merci d'avance
Fred
Bonjour Avec quelque chose comme ça : Dim ctr As CommandBarControl For Each ctr In Application.CommandBars(1).Controls If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then ctr.Delete End If Next ctr
Cordialement Pascal
"Fred64" a écrit dans le message de news:
Bonjour tout le monde, J'ai une barre d'outil qui se créait automatiquement en VBA. Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier si le bouton n'existe pas déjà (nom identique). J'espère avoir été clair. Merci d'avance Fred
Fred64
Merci Pascal, je testerai ca ce soir A bientot Fred "papou" <cestpasbon@çanonplus> a écrit dans le message de news: %
Bonjour Avec quelque chose comme ça : Dim ctr As CommandBarControl For Each ctr In Application.CommandBars(1).Controls If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then ctr.Delete End If Next ctr
Cordialement Pascal
"Fred64" a écrit dans le message de news:
Bonjour tout le monde, J'ai une barre d'outil qui se créait automatiquement en VBA. Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier si le bouton n'existe pas déjà (nom identique). J'espère avoir été clair. Merci d'avance Fred
Merci Pascal, je testerai ca ce soir
A bientot
Fred
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
%23qKRdwWfGHA.764@TK2MSFTNGP05.phx.gbl...
Bonjour
Avec quelque chose comme ça :
Dim ctr As CommandBarControl
For Each ctr In Application.CommandBars(1).Controls
If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then
ctr.Delete
End If
Next ctr
Cordialement
Pascal
"Fred64" <divers.lascars@laposte.net> a écrit dans le message de news:
OEiasnSfGHA.3572@TK2MSFTNGP04.phx.gbl...
Bonjour tout le monde,
J'ai une barre d'outil qui se créait automatiquement en VBA.
Je souhaiterai, avant de créer le bouton (avec un nom déterminé),
vérifier si le bouton n'existe pas déjà (nom identique).
J'espère avoir été clair.
Merci d'avance
Fred
Merci Pascal, je testerai ca ce soir A bientot Fred "papou" <cestpasbon@çanonplus> a écrit dans le message de news: %
Bonjour Avec quelque chose comme ça : Dim ctr As CommandBarControl For Each ctr In Application.CommandBars(1).Controls If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then ctr.Delete End If Next ctr
Cordialement Pascal
"Fred64" a écrit dans le message de news:
Bonjour tout le monde, J'ai une barre d'outil qui se créait automatiquement en VBA. Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier si le bouton n'existe pas déjà (nom identique). J'espère avoir été clair. Merci d'avance Fred
jps
bonjour fred64 pour éviter ce genre de couac, mes maîtres m'ont appris à d'abord annuler la BO en question avant de lancer la proc qui la crée automatiquement...au cas zoù jps
"Fred64" a écrit dans le message de news: e$
Merci Pascal, je testerai ca ce soir A bientot Fred "papou" <cestpasbon@çanonplus> a écrit dans le message de news: %
Bonjour Avec quelque chose comme ça : Dim ctr As CommandBarControl For Each ctr In Application.CommandBars(1).Controls If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then ctr.Delete End If Next ctr
Cordialement Pascal
"Fred64" a écrit dans le message de news:
Bonjour tout le monde, J'ai une barre d'outil qui se créait automatiquement en VBA. Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier si le bouton n'existe pas déjà (nom identique). J'espère avoir été clair. Merci d'avance Fred
bonjour fred64
pour éviter ce genre de couac, mes maîtres m'ont appris à d'abord annuler la
BO en question avant de lancer la proc qui la crée automatiquement...au cas
zoù
jps
"Fred64" <divers.lascars@laposte.net> a écrit dans le message de news:
e$j6cJXfGHA.2188@TK2MSFTNGP05.phx.gbl...
Merci Pascal, je testerai ca ce soir
A bientot
Fred
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
%23qKRdwWfGHA.764@TK2MSFTNGP05.phx.gbl...
Bonjour
Avec quelque chose comme ça :
Dim ctr As CommandBarControl
For Each ctr In Application.CommandBars(1).Controls
If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then
ctr.Delete
End If
Next ctr
Cordialement
Pascal
"Fred64" <divers.lascars@laposte.net> a écrit dans le message de news:
OEiasnSfGHA.3572@TK2MSFTNGP04.phx.gbl...
Bonjour tout le monde,
J'ai une barre d'outil qui se créait automatiquement en VBA.
Je souhaiterai, avant de créer le bouton (avec un nom déterminé),
vérifier si le bouton n'existe pas déjà (nom identique).
J'espère avoir été clair.
Merci d'avance
Fred
bonjour fred64 pour éviter ce genre de couac, mes maîtres m'ont appris à d'abord annuler la BO en question avant de lancer la proc qui la crée automatiquement...au cas zoù jps
"Fred64" a écrit dans le message de news: e$
Merci Pascal, je testerai ca ce soir A bientot Fred "papou" <cestpasbon@çanonplus> a écrit dans le message de news: %
Bonjour Avec quelque chose comme ça : Dim ctr As CommandBarControl For Each ctr In Application.CommandBars(1).Controls If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then ctr.Delete End If Next ctr
Cordialement Pascal
"Fred64" a écrit dans le message de news:
Bonjour tout le monde, J'ai une barre d'outil qui se créait automatiquement en VBA. Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier si le bouton n'existe pas déjà (nom identique). J'espère avoir été clair. Merci d'avance Fred
Modeste
Bonsour® jps avec ferveur ;o))) vous nous disiez :
pour éviter ce genre de couac, mes maîtres m'ont appris à d'abord annuler la BO en question avant de lancer la proc qui la crée automatiquement...au cas zoù
j'ai toujours eu des doutes concernant tes talents de musiciens... ils étaient donc fondés, maintenant que tu parles de couacs au kazoo http://fr.wikipedia.org/wiki/Kazoo http://www.latoilescoute.net/echanger/bricoler/petites_fabrications/instruments/kazoo/ http://jeanluc.matte.free.fr/articles/typologie/kazoo.htm notament je t'ai reconnu le 3ème en haut en partant de la gauche... non ? : http://cjoint.com/?fwlSb8VpIr
attention aux coups de bigophone (nom de son inventeur) -- -- @+ ;o)))
Bonsour® jps avec ferveur ;o))) vous nous disiez :
pour éviter ce genre de couac, mes maîtres m'ont appris à d'abord annuler
la
BO en question avant de lancer la proc qui la crée automatiquement...au
cas zoù
j'ai toujours eu des doutes concernant tes talents de musiciens...
ils étaient donc fondés, maintenant que tu parles de couacs au kazoo
http://fr.wikipedia.org/wiki/Kazoo
http://www.latoilescoute.net/echanger/bricoler/petites_fabrications/instruments/kazoo/
http://jeanluc.matte.free.fr/articles/typologie/kazoo.htm
notament je t'ai reconnu le 3ème en haut en partant de la gauche... non ? :
http://cjoint.com/?fwlSb8VpIr
attention aux coups de bigophone (nom de son inventeur)
--
--
@+
;o)))
Bonsour® jps avec ferveur ;o))) vous nous disiez :
pour éviter ce genre de couac, mes maîtres m'ont appris à d'abord annuler la BO en question avant de lancer la proc qui la crée automatiquement...au cas zoù
j'ai toujours eu des doutes concernant tes talents de musiciens... ils étaient donc fondés, maintenant que tu parles de couacs au kazoo http://fr.wikipedia.org/wiki/Kazoo http://www.latoilescoute.net/echanger/bricoler/petites_fabrications/instruments/kazoo/ http://jeanluc.matte.free.fr/articles/typologie/kazoo.htm notament je t'ai reconnu le 3ème en haut en partant de la gauche... non ? : http://cjoint.com/?fwlSb8VpIr
attention aux coups de bigophone (nom de son inventeur) -- -- @+ ;o)))
Fred64
Salut Pascal, J'ai essayé ce que tu m'as donné, mais ca ne marche pas car ce n'est pas des boutons mais des popup. En fait je dois vérifier si la barre d'outil(XX), qui contient un popup("Choisir un savoir"), qui lui contient plusieurs popup. Ce sont eux qui doivent être vérifiés. Puis chaque popup recevra des boutons. Je n'arrive pas à vérifier ses popup. Merci d'avance fred "papou" <cestpasbon@çanonplus> a écrit dans le message de news: %
Bonjour Avec quelque chose comme ça : Dim ctr As CommandBarControl For Each ctr In Application.CommandBars(1).Controls If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then ctr.Delete End If Next ctr
Cordialement Pascal
"Fred64" a écrit dans le message de news:
Bonjour tout le monde, J'ai une barre d'outil qui se créait automatiquement en VBA. Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier si le bouton n'existe pas déjà (nom identique). J'espère avoir été clair. Merci d'avance Fred
Salut Pascal,
J'ai essayé ce que tu m'as donné, mais ca ne marche pas car ce n'est pas des
boutons mais des popup.
En fait je dois vérifier si la barre d'outil(XX), qui contient un
popup("Choisir un savoir"), qui lui contient plusieurs popup. Ce sont eux
qui doivent être vérifiés.
Puis chaque popup recevra des boutons.
Je n'arrive pas à vérifier ses popup.
Merci d'avance
fred
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
%23qKRdwWfGHA.764@TK2MSFTNGP05.phx.gbl...
Bonjour
Avec quelque chose comme ça :
Dim ctr As CommandBarControl
For Each ctr In Application.CommandBars(1).Controls
If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then
ctr.Delete
End If
Next ctr
Cordialement
Pascal
"Fred64" <divers.lascars@laposte.net> a écrit dans le message de news:
OEiasnSfGHA.3572@TK2MSFTNGP04.phx.gbl...
Bonjour tout le monde,
J'ai une barre d'outil qui se créait automatiquement en VBA.
Je souhaiterai, avant de créer le bouton (avec un nom déterminé),
vérifier si le bouton n'existe pas déjà (nom identique).
J'espère avoir été clair.
Merci d'avance
Fred
Salut Pascal, J'ai essayé ce que tu m'as donné, mais ca ne marche pas car ce n'est pas des boutons mais des popup. En fait je dois vérifier si la barre d'outil(XX), qui contient un popup("Choisir un savoir"), qui lui contient plusieurs popup. Ce sont eux qui doivent être vérifiés. Puis chaque popup recevra des boutons. Je n'arrive pas à vérifier ses popup. Merci d'avance fred "papou" <cestpasbon@çanonplus> a écrit dans le message de news: %
Bonjour Avec quelque chose comme ça : Dim ctr As CommandBarControl For Each ctr In Application.CommandBars(1).Controls If ctr.Caption = "&Mon Menu" And ctr.Visible = True Then ctr.Delete End If Next ctr
Cordialement Pascal
"Fred64" a écrit dans le message de news:
Bonjour tout le monde, J'ai une barre d'outil qui se créait automatiquement en VBA. Je souhaiterai, avant de créer le bouton (avec un nom déterminé), vérifier si le bouton n'existe pas déjà (nom identique). J'espère avoir été clair. Merci d'avance Fred