Affichage/masquage de la barre de formule

[Thilam]

Bonjour et bonnes fêtes à toutes,
J'ai un pb curieux à vous soumettre.
Dans le souci d'éviter à mes collègues de faire des bourdes avec un fichier
excel que j'ai fabriqué, j'ai fait en sorte de masquer tous les éléments
inutiles de l'écran et notamment la barre de formule.
j'ai également prévu (pas si bête) de rétablir l'affichage lorsque le
fichier est fermé ou même désactivé, c'est à dire lors d'une bascule vers un
autre fichier excel ouvert dans une autre fenêtre de l'appli.

Le résultat est que l'instruction 'Application.DisplayFormulaBar=True'
fonctionne parfaitement lors de la désactivation ( module
ThisWorkbook_DeActivate) mais pas du tout lorsque je ferme le fichier (module
ThisWorkbook_BeforeClose). Cela oblige l'utilisateur à aller dans le menu Afichage pour cocher la barre de formule.

Je précise que je travaille avec excel 97 sous NT4 et WIN 98se et que le
résultat est identique dans les deux environnements

Si quelqu'un peut m'expliquer pourquoi et comment règler le pb, je suis
preneur.
Cdt
Thilam

 

[Jacky]

Bonjour

Voici un exemple qui fonctionne sous Excel 97

Bonne journée [file name=Classeur1_20051227114546.zip size=5386]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20051227114546.zip[/file]

 

[Thilam]

Merci Jacky mais j'ai effectivement constaté que sur un fichier tout simple, ça fonctionne. Je ne comprend pas d'où vient mon problème sans doute une instruction qui bloque quelque part.
Merci quand même.
Cdt
Thilam

 

[Blunet]

Salut Thilam, Jacky,

Je travaille plutôt avec Excel 2003 mais je me demande si la commande pour masquer la barre de formule n'est pas :

Application.DisplayFormulaBar=[b]False[/b]

au lieu de 'True'
J'ai rencontré une fois ce problème
Essaye de mettre ce code dans WorkBook_Open()

Une autre solution consiste à ajouter le code ou reprogrammer l'ouverture d'un nouveau classeur et d'une nouvelle feuille en ajoutant

Application.DisplayFormulaBar=[b]True[/b]

cette fois-ci.

Ciao

 

[Thilam]

Jacky,
Concernant la syntaxe, c'est True pour afficher et False pour masquer (d'ailleurs ça fonctionne très bien dans le cas que j'ai indiqué).

J'ai essayé le truc du nouveau fichier mais ça ne donne rien.

Quand je fais du pas à pas, la valeur de DisplayFormula est à 'False', l'instruction lui dit de la passer à 'True' (Application.DisplayFormula = True)
et après execution de l'instruction la valeur est toujours 'False'. Je n'y comprend rien!
Bon allez! Je vais déjeuner. Bon'ap!
Cdt
Thilam

 

[visiteur]

bonjourThilam, Blunet, Jacky

sous 2003


Sub Macro1()
Application.DisplayFormulaBar = False
End Sub