[VBA]Conditions de valeur de cellule

lml-mike Messages postés 487 Statut Contributeur -  
Bidouilleu_R Messages postés 1209 Statut Membre -
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 1209 Statut Membre 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