Hi @jaslake, thank you so very much for taking the time to put this together, it's incredible.

Unfortunately, when I run this though, I receive the following error: Run-time error '91' object variable or With variable not set, and debug highlights this line as the issue: 
myDate = .Rows(4).Find(thisDate, LookAt:=xlWhole).Column
I can confirm that I have made no changes but only saved the file.

Many thanks and kind regards