Afficher les macros Excel4 en mode "formule" ou &q

Bonjour aux inconditionnels Excel4,

avec un bouton dans la barre usuelle, cette macro inverse le mode affichage des macros.

option_formule
=ECRAN(FAUX)
=LIRE.DOCUMENT(3)
=SI(A3<>3)
=ACTIVER("options.xls")
=FERMER(FAUX)
=ARRETER()
=FIN.SI()
1   **** en A9 (inverseur)
=SI(A9=1)
=OPTIONS.AFFICHAGE(;;;;;;FAUX)
=FORMULE(2;A9)
=ARRETER()
=FIN.SI()
=SI(A9=2)
=OPTIONS.AFFICHAGE(;;;;;;VRAI)
=FORMULE(1;A9)
=FIN.SI()
=ACTIVER("options.xls")
=FERMER(FAUX)
=ARRETER()

par exemple : LIRE.CELLULE , (vous voyez ce que la macro a lu.)

amicalement

Claude.