Problème avec Worksheets("Sheet1").Visible

Bonsoir,

J'ai un soucis, j'essaye par tous les moyens possibles de cacher et de montrer à ma guise des feuilles, mais je n'arrive pas à le faire car j'ai toujours une erreur qui m'apparaît à savoir :

"Erreur 1004": impossible de définir la propriété visible de la classe worksheet

Pouvez-vous m'aider car je ne sais plus trop quoi faire.

Cordialement,

U_goffu

bonsoir

a tu essayer avec la propriété "visible" des feuilles dans vba

Oui,

j'ai bien défini mes différentes feuilles :

Set Wb1 = ActiveWorkbook

Set WsSheet1 = Sheets("Sheet1")

Wb1.WsSheet1.Visible=xlSheetVisible

Wb1.WsSheet1.Visible=True

Wb1.WsSheet1.Visible=0

Enfin, j'ai essayé plusieurs choses mais je n'y arrive pas :/

Nouveau problème ^^

Avec cette ligne de commande j'ai une nouvelle erreur à savoir:

erreur 438 Propriété ou méthode non gérée par cet objet

Wb1.WsSheet1.Visible = xlSheetVisible

bonsoir U_goffu

ici est un sujet qui devrai t'interresser https://forum.excel-pratique.com/excel/verrouillage-partielle-d-un-classeur-t78431.html

Bonjour,

Essaie comme cela

Dim WsSheet1 As Worksheet
    Set WsSheet1 = ActiveWorkbook.Worksheets("Sheet1")
    WsSheet1.Visible = True

A+

Bonjour,

J'ai essayé, mais rien à faire. Voici un exemple de mon fichier.

Cdlt,

U_goffu

Bonsoir,

ActiveWorkbook.Protect Structure:=True, Windows:=True  'enlève la protection du classeur

Ne trouves-tu pas que ton commentaire et la commande sont quelque peu antinomiques

Si tu protèges au lieu de déprotéger avant d'opérer, résultat garanti !

NB- Utiliser ThisWorkbook (désigne précisément le classeur contenant la macro) plutôt que ActiveWorkbook (imprécis...).

La procédure devrait être dans un module standard...

Bonjour,

Alors du coup j'ai essayé en enlevant la ligne que tu as mentionné, en espérant que ce soit cela néanmoins rien ne fonctionne encore :/ .

Curieux !

Car dès que j'ai remplacé cette ligne par ThisWorkbook.Unprotect... seule la feuille 1 est restée visible (après un petit appui sur l'icône de test de macro bien sûr).

Re-Bonjour,

Effectivement, tu as raison, c'est moi qui me suis encore planté. Merci beaucoup de ton aide. Je commençais à désespérer

Bonne journée

U_goffu