Why use VB. You can use regular conditional formatting.
Change from Cell Value is to Formual is and use something like

=FIND("lunch", A1)0

If it finds the string lunch anywhre in the cell it returns true and formats
the cell. Off can be done in much the same way...

=FIND("off", A1)=0

HTH

"Fleone" wrote:

I would like to have cells in a workbook formatted depending on their
contents, not their formulas.
For example: If a cell contains the word "Lunch" I want the cell to be
formatted in Yellow, all through the workbook.
Transversely, if a cell does not contain the word "Off", I would like it to
be Blue, all through the workbook.
I have little practical Visual Basic experience and most of what I have
already picked up has been from reverse engineering other scripts.
Would appreciate any assistance.
Thanks.