test présence d'une chaine de caractères dans une cellule VBA

[eddiestid]

Bonjour,

Je voudrais savoir si il est possible en VBA de tester la présence d'un mot dans une cellule qui contient une chaine de caractère avec par exemple une variable booléenne.

Exemple: la cellule contient "Niveau simple"
On cherche ici à savoir si la cellule contient le mot "simple"
et donc là on nous rendrait la valeur true mais si par exemple il y avait dans la cellule "Niveau or" on nous renverrait la valeur false.
Merci de me dire si c'est possible.

 

[phlaurent55]

Re : test présence d'une chaine de caractères dans une cellule VBA

Bonjour eddiestid, et bienvenue sur le forum

un essai par formule en pièce jointe

à+
Philippe

 

[phlaurent55]

Re : test présence d'une chaine de caractères dans une cellule VBA

Re,

un essai par macro

à+
Philippe

 

[eddiestid]

Re : test présence d'une chaine de caractères dans une cellule VBA

Merci phlaurent55 ! J'ai à présent un autre problème sur VBA, un simple If-End IF ne fonctionne pas, j'obtiens le message d'erreur suivant "End If sans bloc If"

 

[phlaurent55]

Re : test présence d'une chaine de caractères dans une cellule VBA

Re,

sans voir le code que tu as "bidouillé", il ne m'est pas possible de voir où se trouve le problème

est-ce que l'exemple donné lors de ma réponse précédente fonctionne ???

For i = 5 To 9
If Cells(i, 2) Like ("*simple*") Then Cells(i, 5) = "Vrai"
Next i

ce code peut aussi s'écrire de la manière suivante pour un même résultat:

For i = 5 To 9
If Cells(i, 2) Like ("*simple*") Then
Cells(i, 5) = "Vrai"
End If
Next i

ou comme ceci si on veut ajouter "Faux"

For i = 5 To 9
If Cells(i, 2) Like ("*simple*") Then
Cells(i, 5) = "Vrai"
Else
Cells(i, 5) = "Faux"
End If
Next i

à+
Philippe

 

[eddiestid]

Re : test présence d'une chaine de caractères dans une cellule VBA

Oui oui merci philippe la première solution marche à merveille, en cours nous travaillons sur windows et là je me retrouve sur mac et il y a quelques petites différences...
Merci !