Wrong Code????

[Ralph M]

When the user enters data into a Column, I have Code to check the date in the Cell "AA4" and then MsgBox if the Date is expired. Here is the Code I am trying to use.

If Target.Column = 27 And ActiveSheet.Range("$AA$4") < Now() then
msgbox "Date not good"
end if

My problem is, I happen to have 10/2/11 in the Cell "AA4", when I try to enter data, I get the MsgBox.
I shouldn't get the MsgBox until tomorrow 10/3/11.

If I put the date 10/1/11, I do not get the MsgBox. The user may also change this date.
Any Help will be appreciated.

 

[shg]

Try changing Now to Date.

 

[Ralph M]

That's it, thanks much.