Si cellule contient un mot donc

Hello à tous,

Pouvez-vous m'aider à trouver la solution au problème suivant?

En vba, lorsque la cellule contient le mot "dispo" alors la case se met en rouge!

Example: frank dispo, isabelle dispo,etc...

'DISPO

If Cells(iRow, iColumn).Value = "*DISPO*" Then

Cells(iRow, iColumn).Font.Color = RGB(0, 0, 0)

Cells(iRow, iColumn).Interior.Color = RGB(255, 0, 0)

End If

J'ai essayé avec les asterisks mais ça ne fonctionne pas!

Merci d'avance pour votre aide.

Cordialement,

Setila

Bonjour,

sans répondre complètement à votre question, je vous conseille de regarder du coté de l'instruction LIKE sous VBA.

@ bientôt

LouReeD

Bonjour LouReeD,

Un grand merci pour ton aide!!!

Ça fonctionne très bien et je viens d'apprendre encore qqch en vba!

super....merci

Cordialement,

Setila

Bonsoir,

ce n'est pas grand chose, vous savez !

Merci de vos remerciements !

@ bientôt

LouReeD