macro, conditions IF

[Zipou]

Bonjour a tous !!

Jai besoin d'aide, apres une recherche sur les articles je n'ai pas trouvé de reponse pour resoudre mon problème...

Tout dabord dans un tableau excel jai des cellules remplis de la facon suivante :

LIVRE 12
CD 22
LIVRE 56

Je cherche me moyen de faire ceci :

Si cellule = LIVRE faire ............
Si cellule = CD faire ..........
SANS PRENDRE EN COMPTE LES NUMEROS QUI SUIVENT....

I NEED HELP !!

Merci à vous et bonne journée a tous !!

Zipou

 

[Arnaud]

salut,

If InStr(1, UCase(Range("A1")), "LIVRE", vbTextCompare) <> 0 Then MsgBox "mot Livre trouvé"

 

[elodie]

Range("A1").Select
With Selection
If .Value Like "LIVRE*" Then
' fait ceci

ElseIf .Value Like "CD*" Then
'fait cela

End If
End With

 

[Zipou]

MERCI BEAUCOUP !!