Barre d'outil personnalisée uniquement dans fichier

[PILATE]

[RESOLU] Barre d'outil personnalisée uniquement dans fichier

Bonjour,

Après avoir programmé des macros, je souhaiterais les utiliser via un bouton sur la barre d'outil. Le problème c'est qu'après avoir créé cette barre, elle apparait pour tout les fichiers.

Comment faire en sorte qu'elle ne soit attachée qu'à un seul fichier, s'il-vous-plait ?

 

[camarchepas]

Re : Barre d'outil personnalisée uniquement dans fichier

Bonjour,

La créer en début de fichier lors du workbook.open et la supprimer au moment du workbook.close

 

[camarchepas]

Re : Barre d'outil personnalisée uniquement dans fichier

Bonjour ,

Voici une petite démo :

 

[youky(BJ)]

Re : Barre d'outil personnalisée uniquement dans fichier

Bonjou Pilate, camarchepas,
Un fichier exemple fait maison depuis longtemps.
Sous 2007 il faut aller dans l'onglet complément
Bruno

 

[PILATE]

Re : Barre d'outil personnalisée uniquement dans fichier

Bonjour,

Merci pour vos réponses. En fait j'ai une barre d'outil toute prête sauf que j'aimerais juste la désactiver quand je quitte le fichier et la réactiver à son ouverture. Je voudrais juste du code simple vba.

 

[MJ13]

Re : Barre d'outil personnalisée uniquement dans fichier

Bonjour à tous

PILATE: Le mieux est d'attacher ta Barrre d'outils au fichier (facile sur XL2003 mais peut-être plus complexe sur XL2007).

 

[camarchepas]

Re : Barre d'outil personnalisée uniquement dans fichier

Bonjour,

Es-tu sous excel 2007 ?

Sous 2003, ma solution fonctionne trés bien et disparaît en même tant que la fermeture fichier .

 

[MJ13]

Re : Barre d'outil personnalisée uniquement dans fichier

Bonjour camarchepas.

Le souci est de savoir ce que Pilate veux, car au vu du peu d'éléments, il est difficile de donner la solution adaptée (cela arrive souvent, voire tout le temps sur XLD 🙂).

Sinon voir ce fichier dans ce post:

https://www.excel-downloads.com/threads/macros-et-icones-perso-dans-excel-2007.142189/

 

[PILATE]

Re : Barre d'outil personnalisée uniquement dans fichier

Ok donc je suis sous 2003 mais quand j'attache une barre d'outil, ça n'a aucun effet sur ce que je viens de dire, ou alors je le fais mal. N'y a-t-il pas une solution en vba ?

 

[Dull]

Re : Barre d'outil personnalisée uniquement dans fichier

Salut Pilate, Michel🙂, camarchepas (AttentionauCopyright😀), Youky(BJ), le Forum

Essaye de t'inspirer de ce Fil auquel j'ai participé. Ne serait-ce L'ouvrir, Lien supprimé, Voir si les barres d'outils sont bien là, le refermer et ouvrir un autre classeur pour voir si les barres d'outils ont bien disparues.

Bonne Journée

 

[camarchepas]

Re : Barre d'outil personnalisée uniquement dans fichier

Re ,
Lol Dull,
Tu n'attaches rien en fait ,
dans le code , il y a ce qu'il faut pour créer puis supprimer: donc c'est le classeur qui fait tout et pas l'utilisateur. et c'est en vba , mais avant de faire le pain, il faut façonner la pâte.

 

[PILATE]

Re : Barre d'outil personnalisée uniquement dans fichier

Merci,
J'ai essayé mais le compilateur n'a pas l'air d'aimer ceci

Set CmdBar = Application.CommandBars _
.Add(Name:="NomBarre", Position:=msoBarTop, _
Temporary:=True)

 

[PILATE]

Re : Barre d'outil personnalisée uniquement dans fichier

Bon en fait je crois savoir pourquoi ça ne fonctionne pas l'attachement des BO. Au début j'en avait créé plusieurs et attaché un peu à toutes les sauces. Apparemment, excel ne supprime pas une barre si elle est encore attachée, non ?

EDIT : je dirais même plus maintenant j'ai un gros problème, j'ai essayé de supprimer toutes les affectations de BO et toutes les BO sur touts les fichiers, mais ma BO reviens systématiquement...

SOS

 

[MJ13]

Re : Barre d'outil personnalisée uniquement dans fichier

Re, Salut Dull

'Pour ne pas avoir la barre quand on ferme Excel
  'Set MaBar = Application.CommandBars.Add("MJ Utilitaire 2009", , , temporary:=True)
  'Pour  avoir toujours la barre avec sauvegarde de l'emplacement quand on ferme Excel

Issu de mon utilitaire. C'est pour cela que je met souvent des remarques dans mes codes, cela peut-être utile (n'est-ce pas JM 🙂).

Sinon, penser à supprimer ta BO avant de quitter Excel.

 

[PILATE]

Re : Barre d'outil personnalisée uniquement dans fichier

Bah c'est ce que je fais mais elle revient l'andouille de BO.

Apparemment c'est lié à mon xla que j'ai enregistrer à partir dudit fichier

Petit probleme, je ne peux pas enregistrer les modif de mon xla 😀

EDIT : finalement, j'ai copier/coller les modules dans un nouveau fichier puis export en xla. Le code du Fil fonctionne parfaitement. Par contre l'attachement ça fonctionne toujours po

_________________________
Merci zot tout