Erreur d'exécution '1004' sur propriété visible de la classe worksheet

guigui971 · 26 Février 2012

Bonjour à tous,

J'ai ce message :
"Erreur d'exécution '1004':
Impossible de définir la propriété visible de la classe worksheet"

Le deboguage me renvoie à : (avec en rouge la ligne fléchée)

Private Sub HideAllSheets()
'Hide all worksheets except the macro welcome page
Dim ws As Worksheet

Worksheets(WelcomePage).Visible = xlSheetVisible

For Each ws In ThisWorkbook.Worksheets
If Not ws.Name = WelcomePage Then ws.Visible = xlSheetVeryHidden
Next ws

Worksheets(WelcomePage).Activate
End Sub

Ce message est en rapport avec une macro qui oblige à ce que les macro soient activées pour voir les feuilles.

Merci

PS : je précise que je suis débutant complet. Donc je baigne pour l'instant!

Pierrot93 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Bonjour,

Si WelcomePage est le nom d'une feuille, manque les guillemets...

Code:

Worksheets("WelcomePage").Visible = xlSheetVisible

bonne journée
@+

guigui971 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Salut,

A un endroit j'ai Const WelcomePage = "Macros"

Donc je pense que le nom de la feuille est Macro et non Welcomepage.

Merci

Pierrot93 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Re,

A un endroit j'ai Const WelcomePage = "Macros"

faudrait connaitre cet endroit.... et as tu bien une feuille nommée "Macros"...

guigui971 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

En fait je réalise une chose :
Ce problème d'erreur 1004 ne se pose que quand je désactive le "protéger le classeur" (structure)
PAr contre quand j'active cette protection de classeur, la macro ne fonctionne plus.
Or, je veux protéger le classeur pour ne pas que l'utilisateur supprime par erreur des feuilles.

Merci

Pierrot93 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Re,
bah il faut déprotéger ton classeur et le re-protéger...

Code:

ThisWorkbook.Unprotect "toto"
'ton code
ThisWorkbook.Protect "toto"

guigui971 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Pierrot93 à dit:
Re,

faudrait connaitre cet endroit.... et as tu bien une feuille nommée "Macros"...

J'ai bien une feuille nommée "macros" : sur celle-ci il y a simplement écrit : tableur inactif, veuillez activer les macro pour pouvoir l'utiliser.

Et au début du code on a donc çà:

Option Explicit
Const WelcomePage = "Macros"
Private Sub Workbook_Activate()
Call ToggleCutCopyAndPaste(False)
End Sub

Merci

guigui971 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Pierrot93 à dit:
Re,
bah il faut déprotéger ton classeur et le re-protéger...

Code:

ThisWorkbook.Unprotect "toto" 'ton code ThisWorkbook.Protect "toto"

Intéressant!
Mais j'insère ton bout de code où?

Merci

guigui971 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Pierrot93 à dit:
Re,
bah il faut déprotéger ton classeur et le re-protéger...

Code:

ThisWorkbook.Unprotect "toto" 'ton code ThisWorkbook.Protect "toto"

Intéressant!
Mais j'insère ton bout de code où?

Merci

Pierrot93 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Re,

regarde le post #6

Pierrot93 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Re,

au début et à la fin de la procédure qui pose problème...

guigui971 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Désolé je ne comprend pas où. Je suis débutant total...
Quand tu mets "ton code" çà veut dire que je mets tout mon code entre tes lignes?
Merci

Pierrot93 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Re,

bah si tu es débutant, peut être commencer par éviter les protections de feuilles et du classeur....

guigui971 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Ce que tu appelles procédure, c'est bien ce qui commence par Private Sub HideAllSheets() et se finit par end sub?

guigui971 · 26 Février 2012

Re : Erreur d'exécution '1004' sur propriété visible de la classe worksheet

Pierrot93 à dit:
Re,

bah si tu es débutant, peut être commencer par éviter les protections de feuilles et du classeur....

Sauf que cela me semble indispensable de le mettre...

Erreur d'exécution '1004' sur propriété visible de la classe worksheet

guigui971

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

guigui971

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

guigui971

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

guigui971

XLDnaute Junior

guigui971

XLDnaute Junior

guigui971

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

Pierrot93

XLDnaute Barbatruc

guigui971

XLDnaute Junior

Pierrot93

XLDnaute Barbatruc

guigui971

XLDnaute Junior

guigui971

XLDnaute Junior

Discussions similaires