Menu

Macro qui déprotege une feuille lorsqu'une ligne contient des cellules vides

- - Dernière réponse : f894009
Messages postés
14385
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
24 mai 2019
- 16 mai 2019 à 16:51
Bonjour,

Existe t'il une macro qui permette d'ôter la protection de la feuille lorsque l'on sélectionne une ligne contenant des cellules vides ?

Merci de l"aide apportée
Afficher la suite 

Votre réponse

1 réponse

Messages postés
14385
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
24 mai 2019
1137
0
Merci
Bonjour,
Code a mettre dans le vba de la feuille
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    'a vous definir la plage de cellules
    Lig = Target.Row
    If Application.WorksheetFunction.CountBlank(ActiveSheet.Range("A" & Lig & ":Z" & Lig)) > 0 Then
        ActiveSheet.Unprotect Password:="mon mot de passe"
    End If
End Sub
Commenter la réponse de f894009