Probleme Range, Hidden

[chris_tls]

Bonjour à tous,

J'essaie de mettre en place un code VBA sensé tout simplement afficher des lignes cachées, mais voila qu'au lieu de m'afficher les lignes que je souhaite il m'en affiche plus, et j'ai beau retourner le problème dans tous les sens je ne trouve pas ce qui créer le problème.

If Sheets("AFFECTATION DES RESULTATS").Range("M33").Value = True Then
    For i = 35 To 56
        Range("A" & i).Activate
        Selection.EntireRow.Hidden = False
    Next i

L'erreur s'effectue des le premier Next i donc je ne saisis pas l'idée du problème...

un peu d'aide please 🙁

 

[mromain]

Re : Probleme Range, Hidden

bonjour chris_tls

tu peux éviter la boucle en écrivant

Rows("35:56").hidden = False

a+

 

[chris_tls]

Re : Probleme Range, Hidden

Je te remercie ça marche, bien que je ne comprenne pas vraiment pourquoi ma méthode ne marche pas seulement à cet endroit là ....
Bref merci pour la rapidité de la réponse.

 

[mromain]

Re : Probleme Range, Hidden

re,

c'est vrai que c'est étrange, je ne vois pas pourquoi ton code ne marchait pas...

a+

 

[chris_tls]

Re : Probleme Range, Hidden

Je reprends le code d'une personne et la feuille en question est protégée, j'enlève pourtant la protection mais je ne vois que ça...