Discussion :

[Tcmat]

Salut

Selon mes classeurs Excel, j'ai crée des menus déroulants ou des barres d'outils afin d'accéder à mes macros.
Ex : 2 macros et 2 classeurs
Je voudrai savoir comment faire pour afficher la barre d'outils N°1 uniquement dans classeur A (elle ne doit pas être visible dans le classeur B).
Et inversement comment faire pour afficher le menu déroulant N°2 uniquement dans le classeur B (il ne soit pas être visible dans le classeur A).

J'espére que je suis clair.

[zazaraignée]

Salut

Dans l'explorateur de projets (avec tes deux classeurs sont ouverts), double-clique sur l'icône du premier classeur (ThisWorkbook) pour ouvrir sa page de code. Insère ces deux routines

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub Workbook_Open()
    ' Pour s'assurer que la 2e barre d'outils est masquée
    Application.CommandBars("BarreOutilsB").Visible = False
    ' Pour afficher la 1e barre d'outils
    Application.CommandBars("BarreOutilsA").Visible = True
End Sub
 
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.CommandBars("BarreOutilsA").Visible = False
End Sub

Répète l'opération pour le second classeur mais en inversant les nom des barres d'outils.

[Tcmat]

Salut

Ca marche trés bien pour les barres d'outils , mais comment faire pour les menus déroulants ???

[Tcmat]

Salut

Récapitulation :
Pour masquer une barre d'outils :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

Pour masquer un menu déroulant personnalisé, il faut passer par une macro qui créée ce menu et y affecte le chemin des macros à l'ouverture du classeur et une autre qui efface ce menu à la fermeture du classeur