View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JP[_4_] JP[_4_] is offline
external usenet poster
 
Posts: 897
Default Help! I need a macro to check dates and autopopulate cells

Change

If cell.Value < Now Then
cell.Offset(0, 2).Value = "Overdue"
End If

to this:

If cell.Value < Now Then
If cell.Offset(0, 2).Value < "Completed" Then
cell.Offset(0, 2).Value = "Overdue"
End If
End If


HTH,
JP


On May 1, 1:47*am, Monomeeth
wrote:
Hi Mike / JP

Thanks for your help. One problem though:

Whilst your macros work, I've now realised that we also don't want the macro
to change the status to Overdue if the status happens to already be marked as
Complete.

I'm not sure how to adapt your macros to make this improvement? Your help
would be greatly appreciated!

:)