Bonjour à tous, le Forum
J'utilise la macro ci-dessous dans une place (A3😛250) pour masquer les lignes vides ou =ZZZ. Elle fonctionne très bien.
Mon souci est qu'elle se bloque à cette ligne Rows("" & valeur.Row & ":" & valeur.Row & "").EntireRow.Hidden = True lorsque je protège la feuille par un mot de passe.
Comment utiliser une macro dans une feuille ou classeur PROTEGER sous excel 2007 ?
Merci de votre aide
Amicalement
Sub Masquer_Lignes_Conditionnel()
' Cette macro permet de masquer les lignes A3:a249 correspondante = ZZZ
Dim valeur As Range, vide As String, c As Byte
For Each valeur In Range("A3😛250")
If (valeur.Column > 0 And valeur.Column < 9) _
Then
If valeur = vide Or valeur = "ZZZ" Then c = c + 1
If valeur.Column = 8 And c = 8 Then
Rows("" & valeur.Row & ":" & valeur.Row & "").EntireRow.Hidden = True
End If
End If
If valeur.Column = 8 Then c = 0
Next
End Sub
J'utilise la macro ci-dessous dans une place (A3😛250) pour masquer les lignes vides ou =ZZZ. Elle fonctionne très bien.
Mon souci est qu'elle se bloque à cette ligne Rows("" & valeur.Row & ":" & valeur.Row & "").EntireRow.Hidden = True lorsque je protège la feuille par un mot de passe.
Comment utiliser une macro dans une feuille ou classeur PROTEGER sous excel 2007 ?
Merci de votre aide
Amicalement
Sub Masquer_Lignes_Conditionnel()
' Cette macro permet de masquer les lignes A3:a249 correspondante = ZZZ
Dim valeur As Range, vide As String, c As Byte
For Each valeur In Range("A3😛250")
If (valeur.Column > 0 And valeur.Column < 9) _
Then
If valeur = vide Or valeur = "ZZZ" Then c = c + 1
If valeur.Column = 8 And c = 8 Then
Rows("" & valeur.Row & ":" & valeur.Row & "").EntireRow.Hidden = True
End If
End If
If valeur.Column = 8 Then c = 0
Next
End Sub