Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 Set maplage = Selection.Find(What:=Trim(Me.In_CodeArt.Text), After:=ActiveCell, LookIn:=xlValues, LookAt _
        :=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
        True)
il me retourne la valeur trouvée ...

je voudrais la ligne ...