Discussion :

[Springbank35]

Bonjour à tous,

J'arrive à la fin dans la création de mon document.
Pour faciliter la navigation, j'ai créer une barre d'outils propre au document



Je souhaiterai que mon bouton Explorer permette l'ouverture et la fermeture, au clic, de l'explorateur de document.

J'arrive déjà à l'ouvrir l'explorateur:

Code :

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

1
2
3
4
5
 
Sub Explorer()
    ActiveWindow.DocumentMap = True
 
End Sub

Ma question est Comment faire après un deuxième clic de fermer cet explorateur.

Merci pour vos réponses,

Sincèrement,

[clementmarcotte]

Bonjour,

Bonjour à tous,

J'arrive à la fin dans la création de mon document.
Pour faciliter la navigation, j'ai créer une barre d'outils propre au document



Je souhaiterai que mon bouton Explorer permette l'ouverture et la fermeture, au clic, de l'explorateur de document.

J'arrive déjà à l'ouvrir l'explorateur:

Code :

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

1
2
3
4
5
 
Sub Explorer()
    ActiveWindow.DocumentMap = True
 
End Sub

Ma question est Comment faire après un deuxième clic de fermer cet explorateur.

Merci pour vos réponses,

Sincèrement,

À première vue, la première chose à tenter, c'est de remplacer True par False.

Ou bien, avec un peu de chance, ceci devrait permettre de basculer en ouvert et fermé (non testé)

Sub Explorer()
ActiveWindow.DocumentMap = - ActiveWindow.DocumentMap
End Sub

[Springbank35]

Merci pour ta réponse,

Je vais essayer demain.

j'ai trouvé ça aussi sur le net en m'aidant de ta réponse:

Code :

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

1
2
3
 
ActiveDocument.ActiveWindow.DocumentMap = _ 
 Not ActiveDocument.ActiveWindow.DocumentMap