Barre d'outils

Bonjour

J'ai créé deux barres d'outils.

J'aimerais, si possible que la première s'affiche à l'ouverture du fichier et se ferme a sa fermeture. (en gros qu'elle ne soit plus accessible après la fermeture du fichier)

La seconde, je voudrais qu'elle ne s'affiche que s'il y a une données présente dans une cellule définie.

est-ce possible?

Merci

Salut le forum

Question #1

Il faut mettre dans le module ThisWorkbook de ton classeur

sous l'évènement Before Close

Application.CommandBars("LeNomDeTaBO").Visible = False

et dans l'événement Workbook Open

Application.CommandBars("LeNomDeTaBO").Visible = True

Question #2

Dans le module de ta feuille

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
  If Target = 1 Then
     'affiche la barre
  Else
     'masque la barre
  End If
End If
End Sub

Mytå

Salut

Merci infiniment pour ton aide, ca marche tres bien

Et c'est pratique.

Je pose une nouvelle question, au cas ou ce soit possible

- Est-il faisable en vba d'avoir ds la barre d'outil un "?"

qui qd on clique dessus permet d'avoir des informations sur les élémenst de l'outil qui sont pointé

(ex : on pointe un bouton, cela donne une explication qd à son utilité)

Merci

Fred