Masquer des feuilles utiles à des macros

[Chaps]

Bonjour à tous !

J'ai un classeur donc composé de plusieurs feuilles, j'ai une feuille disons de récapitulation ou je lance mes macros qui font donc références aux autres feuilles. J'aimerai rendre uniquement cette feuille visible et les autres non, mais si je fais format, feuille, et masquer, mes macros sont stoppées par le message suivant :

Erreur d'exécution 1004 : La méthode select de la classe worksheet a échoué

Quel code ou quelle manip dois je utiliser ?

Merci pour le retour d'infos...

@+

 

[Chaps]

Re : Masquer des feuilles utiles à des macros

re,

après recherche j'ai fini par trouver dans un post, voici l'info :

WorkSheets('Feuil2').Visible = False
masquera la feuille 2
et
WorkSheets('Feuil2').Visible = True
la démasquera

Merci !!

 

[bertgrav]

Re : Masquer des feuilles utiles à des macros

bonjour,

ta macro fait référence surement à une feuille pour aller la masquer.
donc si cette feuille est déjà masquée, tu ne peux pas la remasquer donc le message apparait.

affiche de nouveau ta feuille (exemple feuil1) et relance la macro ça doit marcher

Sheets("Feuil1").Visible = True

amicalement

chantal

 

[bertgrav]

Re : Masquer des feuilles utiles à des macros

tu as été plus vif que moi ....

chantal

 

[Chaps]

Re : Masquer des feuilles utiles à des macros

Re,

Bonjour à toi et merci qd même 🙂

 

[Pyrof]

Re : Masquer des feuilles utiles à des macros

Bonjour,

Dans ta macro met le code suivant
feuil2= nom de ta feuile masqué

Worksheets("feuil2").Protect userinterfaceonly:=True

Ceci te permet d'aller lire ou écrire dans les feuiles marsquées ou protégées.

 

[Hervé]

Re : Masquer des feuilles utiles à des macros

bonjour

sinon, ce type de message apparait souvent lorsque l'on veut sélectionner une feuille masquée. solution, ne pas la sélectionner.

sheets("feuil2").select
range("a1")="toto"

ici tu as sélectionné la feuille 2 pour ecrire toto en cellule A1

tu peux tres bien le faire sans sélectionner la feuille 2 :

sheets("feuil2").range("a1")="toto"

salut