HIGHLIGHT A DATE 10 DAYS BEFORE IT IS PAST DUE
 

HIGHLIGHT A DATE 10 DAYS BEFORE IT IS PAST DUE
 

Hi,

Try

Sub Past_Due()
Dim fd As Date
fd = Date
If fd = Cells(1, 1).Value + 20 Then
MsgBox "10 day's before past due"
End If
End Sub


"cookie04" wrote in message
...