Discussion :

[retraite83]

Bonjour,

j'ai une feuille protégée contre les erreurs de saisies et je veux lancer une macro en cliquant sur la cellule C6

En cherchant j'ai trouvé et essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
ActiveSheet.Unprotect Password:=passw
 
    If Selection.Count = 1 Then
        If Not Intersect(Target, Range("C6")) Is Nothing Then
            MsgBox "test ok"
        End If
    End If
 
'ActiveSheet.Protect Password:=passw
End Sub

Lorsque ma feuille est déprotégée, tout se passe bien , mais si je reprotège en fin de macro, cela ne fonctionne plus
Ma cellule C6 est en format "non verrouillée"

j'imagine qu'il faille aujouter un paramètre à :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Protect Password:=passw

Mais je ne trouve pas lequel

merci

[ARTURO83]

Bonjour,

Passw est une variable, mais que vaut-elle?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    passw = "mdp" 'Saisir le mot de passe entre guillemets
    ActiveSheet.Unprotect Password:=passw
    If Selection.Count = 1 Then
        If Not Intersect(Target, Range("C6")) Is Nothing Then
            MsgBox "test ok"
        End If
    End If
    ActiveSheet.Protect Password:=passw
End Sub

Cdlt

[retraite83]

Bonjour

oui password est une variable, je l'utilise sans soucis par ailleurs

j'ai cherché dans les paramètres Excel également au moment de la protection de la feuille mais sans trouver qq chose qui permet ensuite de laisser la possibilités de cliquer sur la cellule une fois la feuille protégée

Comme par exemple "Modifier les scénarios" mais sans succès non plus

Peut être n'est-ce-pas possible

[ARTURO83]

oui password est une variable, je l'utilise sans soucis par ailleurs Mais dans votre code, quelle valeur prend-elle?

Avec le code que je vous aie fourni, j'attribue "Mdp" à la variable passw, et lorsqu'on sélectionne la cellule C6, on obtient bien le message "Ok" et aussitôt après la feuille est bien verrouillée.