Iroise29200
XLDnaute Nouveau
Si le résultat est "Non", je souhaite interdire la saisie sur le reste de la ligne.
Comment faire ?
Comment faire ?
( Charte XLD )Lorsqu’on rentre sur un fil, comme dans la vie de tous les jours, on est poli en disant « Bonjour ».
La politesse n'a rien à voir avec la question posée.ca apporte beaucoup à ma question
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo Fin
If Target.Count > 1 Then Exit Sub
Ligne = Target.Row: Colonne = Target.Column
If Cells(Ligne, "A") = "Non" And Colonne > 1 Then [A1].Select
Fin:
End Sub