Chercher un texte dans une chaîne de caractéres

Bonjour,

J'ai un classeur excel qui contient dans une même colonne mais sur des centaines de lignes des références de peinture.

Chaque ligne comporte plusieurs références. ex ci-dessous.

TE567,TE234,TE756,TE312,TE967

TE517,TE829,TE626,O719,CM908

etc....

Je voudrais automatiser la recherche à savoir :

Ouvrir une boite de dialogue qui demande la teinte à rechercher.

Ensuite lancer une routine sous la forme d'une boucle do while qui recherche la ligne où se trouve la référence recherchée.

Pour terminer afficher une boite de dialogue qui affiche le numéro de ligne.

Pour info une référence n'est présente que sur une seule ligne.

Merci d'avance pour votre aide, bien cordialement Eric.

Bonjour

Avec une formule

Cordialement

Merci pour cette réponse rapide.

Effectivement votre solution fonctionne bien mais je la voulais sous forme de code vba.

En effet j'ai déjà commencé à écrire une macro qui fait d'autres choses dans ma feuille de calcul et je voulais insérer cette fonction de recherche via des boites de dialogue.

Puis je utiliser cette formule directement dans mes lignes vba (je n'ai pas mon pc sur moi pour vérifier) ?

Merci à vous en tout quoi pour votre aide, Bien cordialement Eric.

Bonjour

Une petite macro

Option Explicit

Sub Recherche()
Dim Cel As Range
Dim Recherche

  Recherche = Application.InputBox("référence recherchée", "Recherche", Type:=2)
  If Recherche = False Or Recherche = "" Then Exit Sub
  Set Cel = Cells.Find(what:=Recherche, LookIn:=xlValues, lookat:=xlPart)
  If Not Cel Is Nothing Then
    MsgBox "La recherche est dans la ligne " & Cel.Row
  Else
    MsgBox "Pas cette référence en stock"
  End If
End Sub

Bonjour

Autre..

Cordialement

Bonjour Amadéus et Banzai64,

Merci pour vos solutions.

J'ai adapté le code de Banzai64 pour l'insérer dans ma macro existante.

J'ai réussi à faire ce que je voulais.

Encore bien merci à vous deux, bien cordialement.

Eric.