VBA & Conditiona Formatting

Hi,

i'm using conditional formatting to turn a cell red if another cell has a certain value in it. If it turns red then i would like a msg to popup. The first code below works if i fill the cell red, rather than use CFormatting. I understand that this 'if' function will not work with CFormatting, so i modified the code to the code at the bottom, but it doesn't work.

Any ideas...?

help would be much appreciated

thanks

_________________________________________________

Next Cell

Set Rng = Sheets("sheet1").Range("m24")
For Each Cell In Rng
If Cell.Interior.ColorIndex = 3 Then
MsgBox "You must FIRST fill in cell " & Cell.Address(0, 0)
Application.Goto Cell
Cancel = True
allIsWell = False
End If

___________________________________________________________

Next Cell

Set Rng = Sheets("sheet1").Range("m24")
For Each Cell In Rng
If ColorIndexOfCF = 3 Then
MsgBox "You must FIRST fill in cell " & Cell.Address(0, 0)
Application.Goto Cell
Cancel = True
allIsWell = False
End If

How are you calling the macro? Are you including the code in the Worksheet_Change event, or calling it manually?

Hi,

i'm using the following as it checks the formatting and stops the save if a certain cell has condtional formatting in it;

Private Sub WorkBOOK_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel As Boolean)

Hi,

the conditional formatting is only applicable in the following range;

m24:n73

thanks