Impossible de définir la propriété Visible de la classe Worksheet

KTM à dit:

Bonjour Chers tous
Je ne sais pas comment j'ai dormi la nuit mais dès mon réveil le classeur sur lequel j'ai travaillé la veille a décidé de ne plus fonctionner normalement. Toutes mes macros ou il y'a ( .Visible sont frappées de debogage)

C'elle ci par exemple:

Sub Afficher_tout()
Application.ScreenUpdating = False
Dim o As Object
For Each o In Sheets
o.Visible = True
Next
End Sub

Je suis terrifié aidez moi à comprendre pourquoi . Merci

Cliquez pour agrandir...

Sub Afficher_tout()
   Dim o As Worksheet
   Application.ScreenUpdating = False
   For Each o In Sheets
      o.Visible = True
   Next
   Application.ScreenUpdating = True
End Sub