VBA: Recherche texte dans une variable

[MJ13]

Bonjour à tous

Je voudrais faire un test en VBA de recherche de mots dans une variable.

Ex: Mavariable= "le grand chemin"

Comment faire pour tester que Mavariable contient grand?

Merci d'avance 🙂.

 

[Fred0o]

Re : VBA: Recherche texte dans une variable

Bonjour MJ13,

Exemple de code si "Le grand chemin" est en A1 :

Sub essai()
    Dim MaVariable, VC, Rep, position
    MaVariable = [A1]
    VC = "grand"
    position = InStr(1, MaVariable, VC, vbTextCompare)
    If position <> 0 Then
        Rep = MsgBox(MaVariable & " contient " & VC, vbOKOnly)
    Else
        Rep = MsgBox(MaVariable & " ne contient pas " & VC, vbOKOnly)
    End If
End Sub

A+

 

[Pierrot93]

Re : VBA: Recherche texte dans une variable

Bonjour Michel, Fredoo

une autre solution avec l'opérateur "like" :

Dim Mavariable As String
Mavariable = "le grand chemin"
If Mavariable Like "*grand*" Then MsgBox "contient grand..."

bonne journée
@+

 

[MJ13]

Re : VBA: Recherche texte dans une variable

Bonjour Fredoo, Pierrot

Merci beaucoup pour vos solutions 😉.

J'ai pris celle de Pierrot qui correspond bien à ma demande 🙂.

J'étais parti sur find, mais c'était galère 😕.