Réaffichage des colonnes masquer ou non

Bonjour à tous,

Je tourne sur le forum depuis quelques temps pour trouver une solution à un probleme qui me semble pourtant très simple.

j'ai trouvé plein de codes qui permettent de ré-afficher les colonnes masquées mais les codes testés bug si mes colonnes ne sont pas masquées.

ex :

With Sheets("Synthese des enceintes").Cells

.EntireColumn.Hidden = False

'.EntireRow.Hidden = False

End With

j'ai bien réussi pour les filtres avec ce code

If Worksheets("Synthese des enceintes").AutoFilterMode = True Then

Range("A10:AB200").Select

Selection.AutoFilter

End If

If Worksheets("Synthese des enceintes").AutoFilterMode = False Then

Range("A10:AB200").Select

Selection.AutoFilter

End If

j'ai essayer d'introduire des If comme pour mes filtres mais je dois franchement être mauvais! quelques soit la solution testée la macro s’arrête lorsque aucune colonne n'est masqué.

Si quelqu'un à une idée je suis preneur!

Merci d'avance pour les solutions

Bonjour,

    With Sheets("Synthese des enceintes")
        .Columns.Hidden = False
        .Rows.Hidden = False
    End With

Pas d'erreur avec ce code !

Cordialement.

Effectivement c'est moi le bug la feuille avait été verrouiller par erreur et donc la macro s’arrêtait !!

une dernière question si possible est-ce que la ligne

.Rows.Hidden = False

peut remplacer mon code avec les filtres?

If Worksheets("Synthese des enceintes").AutoFilterMode = True Then

Range("A10:AB200").Select

Selection.AutoFilter

End If

If Worksheets("Synthese des enceintes").AutoFilterMode = False Then

Range("A10:AB200").Select

Selection.AutoFilter

End If

histoire d'alleger un peu ma macro!

Merci

Re,

With Worksheets("Synthese des enceintes")
    If .AutoFilterMode Then
        If .FilterMode Then .ShowAllData
    End If
    .Range("A10:AB10").AutoFilter
End With

Super merci, effectivement se sera un peu moins lourd !

Encore bravo