avec un bouton dans la barre usuelle, cette macro inverse le mode affichage des macros.
- Code: Tout sélectionner
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.
