On 8 Aug, 13:05, OssieMac wrote:
I should have said that I assumed from your request that Today() is in row 1
and that is where the code is looking for it. If not in row 1 then edit the
following line and change the .Row(1) to match the row where Today() is.

Set rngRow1 = .Rows(1)

--
Regards,

OssieMac

Thanks you guys, will give it a try and get back to this post with my
results

Johnnyboy