There is one change if forgot

from
if int(cell) = int(AppDate) then
to
if int(cell) = int(datevalue(AppDate)) then

I made the mistake of comparing a string again a date-serial-number

" wrote:

Thank you for responding, I'll try your suggestions. Much appreciated!