[VBA]Conditions de valeur de cellule

lml-mike Messages postés 455 Date d'inscription   Statut Contributeur Dernière intervention   -  
Bidouilleu_R Messages postés 1181 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'aimerais savoir comment vérifier si une partie de la valeur est présente dans la cellule.

Par exemple :

mettons ces 3 cas distincts
Activecell.value = "Carte illimitée 30 jours"
Activecell.value = "Jour illimité"
Activecell.value = "Quelques heures

if activecell.value possède "Illimité" dans sa valeur alors
msgbox "Oui, c'est illimité"
end if


Merci !!!

1 réponse

Bidouilleu_R Messages postés 1181 Date d'inscription   Statut Membre Dernière intervention   295
 
tu peux utilisé
If InStr(1, ActiveCell.Value, "illimité") > 0 Then ....

par exemple un test simple sur la cellule active

Sub test()
If InStr(1, ActiveCell.Value, "illimité") > 0 Then

MsgBox "Oui, c'est illimité"
Else
MsgBox "Pas illimité"
End If
End Sub
0