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)
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!
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
'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!
Dernière édition: