Affichage de barre d'outil

[Tranbi]

Bonjour le forum,

Je commence par exposer ma situation. Pour faciliter l'utilisation d'un fichier, j'ai créer une barre d'outils dans laquelle j'y ai placé des boutons déclenchant des macros persos. Or, lorsque je ferme ce fichier, la barre d'outils en question reste à l'écran. Est-il possible de faire en sorte que la barre d'outils apparaisse seulement lors de l'ouverture de ce fichier ?


Merci d'avance.

Tranbi

 

[Cathy]

Salut Tranbi et le forum

oui, il faut mettre l'affichage de ta barre dans une macro événementielle
(dans this workbook : workbook open)
Private Sub Workbook_Open()
et la fermeture de la barre dans this workbook : workbook before close
Private Sub Workbook_BeforeClose(Cancel As Boolean)

C@thy

 

[Tranbi]

Merci pour l'info,

Mais quel est l'ordre à donner qui permet de faire apparaitre la barre entre l'ouverture et la fermeture du fichier ?

 

[Vériland]

Re...Tranbi et le forum,

il faut le faire avec l'action False et True...

Pour exemple ce code placé en open va activer le mode plein écran :

Application.DisplayFullScreen = True

à l'inverse, celui-ci placé en beforeclose va désactiver le plein écran :

Application.DisplayFullScreen = False

tu vois c'est un peu comme avec monique et son histoire "jour/nuit"... Lien supprimé...

Bonne continuation

A+ Vériland

 

[Cathy]

Application.CommandBars("Ma Barre Perso").Visible = true
[dans Private Sub Workbook_Open()]
puis avant de fermer : =False
[Private Sub Workbook_BeforeClose(Cancel As Boolean)]

C@thy

 

[Vériland]

hi hi hi,

...;-)

 

[Cathy]

Trop génial, Vériland!!!!

Je me souviens de ce dialogue Jour/Nuit et de ton image des visiteurs, j'en ris encore!!!

C@thy