événement sur modif

Bonsoir,
"Circé" wrote:

Bonsoir à tous !

Petit problème avec les événements que je ne maîtrise pas bien...

Je souhaite qu'en fonction du choix dans une cellule (lié à une liste
déroulante de validation), une autre cellule soit déverrouillée.

Exemple :
Cellule A1 = "OUI"=> déverrouiller la cellule A5
Celleule A2 = "NON" => effacer le contenu de la cellule A5 et la
verrouiller

Si A1 = "OUI" (on déverrouille) et A2 = "NON" (on verrouille), qui
est prioritaire A1 ou A2 ? ;-)

--
Cordialement,

Jacques.

Bonjour Jacques

Si A1 = "OUI" (on déverrouille) et A2 = "NON" (on verrouille), qui
est prioritaire A1 ou A2 ? ;-)

Euh, j'ai fait une erreur dans ma question !
Il s'agit toujours de la cellule A1.

Donc :
Cellule A1 = "OUI"=> déverrouiller la cellule A5
Cellule A1 = "NON" => effacer le contenu de la cellule A5 et la verrouiller

Le problème se pose une seconde fois sur la même feuille pour une autre cellule.

Merci pour t'être penché sur mon problème !

Circé
http://faqword.free.fr

Bonjour Circé,

sans garantie :

Dans le code de 'Feuil1' :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "A1" Then
If UCase(Target.Cells.Text) = "OUI" Then
Range("A5").Locked = False
Worksheets("Feuil1").Unprotect
ElseIf UCase(Target.Cells.Text) = "NON" Then
Range("A5").Clear
Range("A5").Locked = True
Worksheets("Feuil1").Protect
End If
Range("A2").Select
Range("A1").Select
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address(False, False) = "A5" And Range("A5").Locked = True Then
Worksheets("Feuil1").Protect
Else
Worksheets("Feuil1").Unprotect
End If
End Sub

Je vais me faire rectifier par les spécialistes, mais tant pis :-)

Circé wrote:

Bonjour Jacques

Si A1 = "OUI" (on déverrouille) et A2 = "NON" (on verrouille), qui
est prioritaire A1 ou A2 ? ;-)

Euh, j'ai fait une erreur dans ma question !
Il s'agit toujours de la cellule A1.

Donc :
Cellule A1 = "OUI"=> déverrouiller la cellule A5
Cellule A1 = "NON" => effacer le contenu de la cellule A5 et la verrouiller

Le problème se pose une seconde fois sur la même feuille pour une autre
cellule.

Merci pour t'être penché sur mon problème !

Circé
http://faqword.free.fr

--
Cordialement,

Jacques.