VBA Excel 2000 : pb création menus personnalisés

  • Initiateur de la discussion Initiateur de la discussion Didi47
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

D

Didi47

Guest
bonsoir,
je suis sur Excel 2000 (sous Windows Me).
je n'ai malheureusement pas résolu mon problème de création de menus et de barres personnalisés.
Je vous envoie en pièce jointe un morceau du code que je voudrais faire. si vous avez le temps d'y jeter un oeil, toutes les critiques et conseils seront les bienvenus

D'avance merci.

Didi
 

Pièces jointes

Tu essais de créer une barre déjà existante!
les barres d'outils sont crées non pas dans le cadre de ton fichier, mais dans l'environnement d'excel.
dès qu'une barre a été crée elle reste présente visible ou pas de façon définitive jusqu'à son effecment volontaire.

Utilise temporary:= true dans la méthode add
Cette propriété, fait disparaitre de l'environnement excel la barre d'outil que tu es entrain de construire.

Si tu ne le fait pas, ta barre sera crée définitivement et lorsque tu relance ta macro il ne peut crée une barre déjà existante, c'est le sens du message d'erreur.

Lorsque tu fait affichage des barres personnalisées, si tu ne voit pas ta barre classeur actif dans la liste, c'est que propriété enabled est fausse, elle à ce momeno totalement invisible.

avant tous, tu dois faire disparaître ta barre classeuractif.

with commandbars("classeuractif")
.enabled=true
.visible= true
end with
elle devrait apparraitre dans la liste de tes barres
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
3
Affichages
793
  • Question Question
Microsoft 365 Userform recherche
Réponses
10
Affichages
689
Retour