codice:
    Me.TextBox1.Select(InStr(Me.TextBox1.Text, StringaDaCercare), Len(StringaDaCercare))