IF statement based on CELL fill or no fill

**OliB** · 08-27-2012, 03:28 PM

Hello all,

I’m having a hard time coming up with a specific line of code in my update macro.

I want an IF statement that is true when the cell has no fill, but false if it has any color fill.

This is what I have so far:

If selection.interior.pattern = xlBlank Then
    
    ActiveSheet.Paste
    Sheets("ENTRY").Select
    Range("B6:B8").Select
    Application.CutCopyMode = False
    Selection.ClearContents
    Range("B6").Select

    Else
    Sheets("ENTRY").Select
    Application.CutCopyMode = False
    Range("B6").Select
    MsgBox ("Error: Invalid date. Either Holiday or Weekend.")

    End If

Using the current formula, the IF statement is always true even when there is a colored fill in the cell.
BTW the fill is based on conditional formatting, don't know if that matters or not.

Any help would be greatly appreciated.

-Oli

**Cutter** · 08-27-2012, 04:10 PM

@ OliB

Welcome to the forum.

Please notice that code tags have been added to your post(s). The forum rules require them so please keep that in mind and add them yourself whenever showing code in any of your future posts. To see instructions for applying them, click on the Forum Rules button at top of the page and read Rule #3.
Thanks.

**vandan_tanna** · 08-27-2012, 05:12 PM

>>BTW the fill is based on conditional formatting, don't know if that matters or not.
It matters!

take a look at the following link (Chip Pearson's site) for some idea on how to tackle this
http://cpearson.com/excel/CFColors.htm