Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

macro 93 unhide chart

  • Initiateur de la discussion Initiateur de la discussion JPG
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

JPG

XLDnaute Nouveau
Je n'ai jamais abandonné le langage macro 93, et j'ai beaucoup de macros dans ce langage. Aujourd'hui je suis obligé d'avancer un peu, mais si je reste en xlsm ça va à peu près. Par contre il y a au moins une expression qui ne passe pas, c'est l'activation d'un graphique pour modifier les séries, par exemple :

=WORKBOOK.SELECT("Cac-Portef";"Cac-Portef")
=UNHIDE("[ Récap 255j.xlsm]Cac-Portef CHART 4")
=SELECT("S1")
=FORMULA("=SERIES(;;'Récap Portef'!RaaaC3:R946C3;1)")
=SELECT("S2")
=FORMULA("=SERIES(;;'Récap Portef'!RaaaC5:R946C5;2)")
=SELECT("AXIS 1")
=SCALE(TRUE;TRUE;TRUE;TRUE;TRUE;FALSE;FALSE;FALSE)
=HIDE()

La macro bute systématiquement sur le "UNHIDE". quelle est l'expression qui résoudrait mon problème ?
(en VBA c'est ActiveChart, mais je voudrais éviter.
Merci
 
Re : macro 93 unhide chart

Bonjour,

A tout hasard, je remarque un espace qui semble superflu dans l'instruction suivante
Code:
=UNHIDE("[ Récap 255j.xlsm]Cac-Portef CHART 4")
=UNHIDE("[ puis un espace
 
Re : macro 93 unhide chart

Bonjour JPG, PMO2,

Tiré de l'aide sur les fonctions macros Excel 4.0 :

Donc essayez :

Code:
=UNHIDE(" Récap 255j.xlsm")
Avec l'espace si vous y tenez.

A+
 
Re : macro 93 unhide chart

Re,

Si au lieu de la fenêtre vous voulez afficher/masquer une feuille, utiliser :

Code:
=AFFICHER.CLASSEUR("Cac-Portef")
---------
=MASQUER.CLASSEUR("Cac-Portef")
si "Cac-Portef" est bien le nom de la feuille.

A+
 
Re : macro 93 unhide chart

En fait je n'ai qu'un classeur ouvert qui s'appelle " Récap 255j.xlsm". Dans ce classeur, j'ai une feuille qui s'appelle "Récap Portef", une feuille "Cac Portef" et une feuille macros.Je veux réactualiser le graph 4 qui se trouve dans Cac Portef. Donc j'ai écris :

=ACTIVATE(" Récap 255j.xlsm")
=WORKBOOK.SELECT("Macros";"Macros")
=SELECT(R19C21:R37C21)
=FORMULA.REPLACE("aaa";'Récap Portef'!R679C1;2;1;FALSE;FALSE)
=FORMULA.REPLACE("bbb";'Récap Portef'!R679C1+1;2;1;FALSE;FALSE)


=WORKBOOK.SELECT("Récap Portef";"Récap Portef")
=SELECT("R681C3:R946C3")
=CLEAR()
=SELECT("R681C5:R946C5")
=CLEAR()

=SELECT("RaaaC3")
=FORMULA("0")
=SELECT("RbbbC3")
=FORMULA("=(RC[-1]-R[-1]C[-1])/RaaaC2+R[-1]C")
=SELECT("RaaaC5")
=FORMULA("0")
=SELECT("RbbbC5")
=FORMULA("=(RC[-1]-R[-1]C[-1])/RaaaC4+R[-1]C")
=SELECT("RbbbC3:R946C3")
=FILL.DOWN()
=SELECT("RbbbC5:R946C5")
=FILL.DOWN()

=WORKBOOK.SELECT("Cac-Portef";"Cac-Portef")
=UNHIDE("[ Récap 255j.xlsm]Cac-Portef CHART 4")
=SELECT("S1")
=FORMULA("=SERIES(;;'Récap Portef'!RaaaC3:R946C3;1)")
=SELECT("S2")
=FORMULA("=SERIES(;;'Récap Portef'!RaaaC5:R946C5;2)")
=SELECT("AXIS 1")
=SCALE(TRUE;TRUE;TRUE;TRUE;TRUE;FALSE;FALSE;FALSE)
=HIDE()

Tout ça marchait bien quand j'utilisais Excel 2004.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…