A l'aide des collégues de ce forum; j'ai crée un formulaire de saisie pour ajouter des informations.
J'ai utilisé un code VBA pour exécuter la fonction recherche V dans la colonne C sur la base de l'information de la colonne B (dans la feuille source)
voici le code
If Target.Column = 2 Then
Dim lig As Long
lig = Sheets("Mes listes").Columns(1).Cells.Find(what:=Target.Value, LookAt:=xlWhole).Row
Range("C" & Target.Row) = Sheets("Mes listes").Range("B" & lig).Value
End If
Le code mauellement marche trés bien
mais quand j'utilise le formulaire; la fonction ne s'éxcute pas; je dois retapper le code
merci si vous pouvez m'aider
J'ai utilisé un code VBA pour exécuter la fonction recherche V dans la colonne C sur la base de l'information de la colonne B (dans la feuille source)
voici le code
If Target.Column = 2 Then
Dim lig As Long
lig = Sheets("Mes listes").Columns(1).Cells.Find(what:=Target.Value, LookAt:=xlWhole).Row
Range("C" & Target.Row) = Sheets("Mes listes").Range("B" & lig).Value
End If
Le code mauellement marche trés bien
mais quand j'utilise le formulaire; la fonction ne s'éxcute pas; je dois retapper le code
merci si vous pouvez m'aider