Recherche partie de texte d'une cellule dans une matrice

  • Initiateur de la discussion Initiateur de la discussion Yeah
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Yeah

XLDnaute Nouveau
Bonjour,

J'ai trouvé sur le forum des cas qui ressemblent à ce que je voudrais faire mais ... pas tout à fait:
ici

Mon cas me semble classique: vous avez un relevé bancaire et pour suivre votre budget tout les mois vous mettez: Maisons lorsqu'il s'agit de votre crédit maison, courses lorsqu'il s'agit de vos courses ...

Mais voilà, chaque mois le libellé est différent. Donc à chaque fois que le libellé contient par exemple "crédit immobilier" vous voulez avoir "Maison".

Je joins un fichier pour que ça soit plus clair.

En vous remerciant par avance pour votre aide.
 

Pièces jointes

Dernière édition:
Re : Recherche partie de texte d'une cellule dans une matrice

J'aimerais comprendre la fonction; le script ci dessus est suffisant ?

Function rubrique(lesrubriques As Range, libelle)
rubrique = ""
tablo = lesrubriques
For n = LBound(tablo, 1) To UBound(tablo, 1)
If InStr(libelle, tablo(n, 1)) <> 0 Then rubrique = tablo(n, 2)
Next
End Function
 
Re : Recherche partie de texte d'une cellule dans une matrice

Re

Oui le script est suffisant !!!
La fonction a comme arguments:
lesrubriques qui est le tableau dans lequel sont repertoriées les mots types et les rubriques
libelle qui est la cellule dans laquelle on fait la recherche d'un mot type
On met le range sous forme de tableau : tablo = lesrubriques
on explore le dit tableau de la 1ere ligne LBound(tablo, 1) a la derniere ligne UBound(tablo, 1)
et si le mot situé dans la 1ere colonne se trouve dans le libelle
If InStr(libelle, tablo(n, 1)) <> 0
alors then
on dit que la rubique est ce qu'il y a dans la meme ligne et dans la 2eme colonne
rubrique = tablo(n, 2)
Plus long a ecrire en français qu'en VBA
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour