[VBA]Conditions de valeur de cellule

lml-mike Messages postés 449 Date d'inscription   Statut Contributeur Dernière intervention   -  
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

  1. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    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