Problème for next avec une condition

Bonjour à tous le forum.

Ma demande d'aide concerne du VBA, mais je ne sais pas comment faire pour change le thème.

Voici mon problème :
   j' ai saisi un programme qui me permet de réaliser une recherche avec un for next et des if else then.(Voir lr programme ci joint)

'Procedure de recherche
Sheets("Feuill1").Select
Dim Msg, Style, Response
Msg = "Souhaitez-vous continuer?"
Style = vbYesNo + vbInformation
Dim i
    For i = 1 To Range("B14").End(xlDown).Row
        If Range("B" & i) = Txtrecherche.Value Then
           Unload Me
           Rows(i).Select
           Response = MsgBox(Msg, Style)
                If Response = vbYes Then
                Selection.Font.Bold = False
                Else
                Exit Sub
                End If
        Else
        MsgBox "Pas trouver"
        Exit Sub
        End If
    Next i 

Le programme marche correctement , la première condition est réalisée et le textbox avec les deux bouton marche correctement.
Quand je rajoute la partie en bleu le progamme ne fonctionne plus, c'est à dire que meme si la valeur saisie dans le textbox se trouve dans la liste, le programme m'affiche le message "Pas trouver".

Je solicite votre aide pour m'aider à résoudre se problème (je n'ai plus d'idée pour trouver la solution).

Merci d'avance.

Cordialement

Bonjour,
Je ne suis pas certain de moi, mais tu peux essayer dans ta condition :
       If Range("B" & i).Value = Txtrecherche.Value Then

Salut Mstarsup5

Tout d'abord je te remercie de fournir des renseignements.
Le seul problème c'est que je comprends ce que tu me dis mais
je connais pas le bon code pour le retranscrire (je débute).

Je vais faire des recherche sinon un coup de main serais le bien venue

 

Cordialement