bonjour
j'ai amélioré mon projet et c'est grâce a vous.
seulement j'ai un problème avec la modification des données a partir de mon userform "recherche".
voici mon code worcksheet dans la feuille "bd" il fonctionne bien quant je saisi directement dans la cellule.
contrairement a la sais a partir de mon userform bouton "modifier"
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Row > 1 Then
If Target = "non" Then
Target.Offset(, 11) = "A recouvrir"
ElseIf Target = "oui" Then
Target.Offset(, 11) = "Restitution"
Else
Target.Offset(, 11) = ""
End If
End If
End Sub
j'ai amélioré mon projet et c'est grâce a vous.
seulement j'ai un problème avec la modification des données a partir de mon userform "recherche".
voici mon code worcksheet dans la feuille "bd" il fonctionne bien quant je saisi directement dans la cellule.
contrairement a la sais a partir de mon userform bouton "modifier"
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Row > 1 Then
If Target = "non" Then
Target.Offset(, 11) = "A recouvrir"
ElseIf Target = "oui" Then
Target.Offset(, 11) = "Restitution"
Else
Target.Offset(, 11) = ""
End If
End If
End Sub