Bonjours à tous et à toutes,
Mon problème est que lors de cette comparaison il prends la première chaîne de caractère commune, je souhaiterai prendre la plus grande.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Function Domaine(Description As String) Dim cell As Range Dim Derli_dom As Long, i As Long Derli_dom = Feuil9.Columns(1).Find("*", , , , , xlPrevious).Row For i = 2 To Derli_dom If Description Like "*" & Feuil9.Range("A" & i).Value & "*" Then Domaine = Feuil9.Range("A" & i).Value Exit Function End If Next End Function
Par exemple je cherche AAA02 et dans ma table j'ai AAA01, AAA02, AA03,... le résultat ici sera AAA01.
Merci d'avance pour votre aide.
Partager