Recherche texte

Salut,

"Stéphane Lavergne" <no@spam.fr> a écrit:
| Je cherche à vérifier si une chaine de caractères existe déjà à l'intérieur
| d'une autre chaine de caractères.
|
| Existe-t-il 1 fonction toute faite? (je ne trouve pas dans l'aide)
|
| Si non, j'essaierai de faire 1 fonction pouvant me faire ça.


Faut pas réinventer la roue...

Regarde "Instr" dans l'aide.


--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------

Bonsoir.

à partir de la version 2000, tu peux tester la longueur d'un replace dans ta
chaîne.

If Len(Replace(Me.prenom, "abc", "")) <> Len(Me.prenom) Then
MsgBox "La chaîne abc existe déjà dans " & Me.prenom
End If
si on trouve abc dans la chaîne, sa longueur sera différente de la chaîne
d'origine.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Stéphane Lavergne" <no@spam.fr> a écrit dans le message de
news:%23eGBkVVeDHA.3708@tk2msftngp13.phx.gbl...

Bonjour,

Je cherche à vérifier si une chaine de caractères existe déjà à
l'intérieur

d'une autre chaine de caractères.

Existe-t-il 1 fonction toute faite? (je ne trouve pas dans l'aide)

Si non, j'essaierai de faire 1 fonction pouvant me faire ça.

Merci d'avance

Stéphane Lavergne

Bonjour Stéphane Lavergne

Stéphane Lavergne <no@spam.fr> a confié :
| Bonjour,
|
| Je cherche à vérifier si une chaine de caractères existe déjà à
| l'intérieur d'une autre chaine de caractères.
|
| Existe-t-il 1 fonction toute faite? (je ne trouve pas dans l'aide)
|
| Si non, j'essaierai de faire 1 fonction pouvant me faire ça.
|
| Merci d'avance
|
| Stéphane Lavergne


Tu peux utiliser la fonction Instr :

msgbox InStr(1, "la phrase à analyser", "ana")

si > 0 => trouvé
si = 0 => pas trouvé

--
à+
Arnaud
--------------------------------------------------
Conseils d'utilisation, sites recommandés :
http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
--------------------------------------------------

Jé répond à Anor pour ne pas répondre 3 fois la même chose :)

Merci 3stone,
Merci Raymond
Merci Anor

C'est fou quand même... j'ai cherché 1/2 heure dans l'aide pour rien
trouver... et hop !!! tiens, voila Instr :)

Bon... j'efface mon :
For i = 1 To Len(contenu) - Len(src) + 1
If Mid(contenu, i, Len(src)) = src Then


Stéphane

"Anor" <news@memoaccess.int.ms> a écrit dans le message de
news:egA5ncVeDHA.1908@TK2MSFTNGP12.phx.gbl...

Bonjour Stéphane Lavergne

Stéphane Lavergne <no@spam.fr> a confié :
| Bonjour,
|
| Je cherche à vérifier si une chaine de caractères existe déjà à
| l'intérieur d'une autre chaine de caractères.
|
| Existe-t-il 1 fonction toute faite? (je ne trouve pas dans l'aide)
|
| Si non, j'essaierai de faire 1 fonction pouvant me faire ça.
|
| Merci d'avance
|
| Stéphane Lavergne


Tu peux utiliser la fonction Instr :

msgbox InStr(1, "la phrase à analyser", "ana")

si > 0 => trouvé
si = 0 => pas trouvé

--
à+
Arnaud
--------------------------------------------------
Conseils d'utilisation, sites recommandés :
http://users.skynet.be/mpfa/
Access Memorandum - http://memoaccess.free.fr
--------------------------------------------------