Hello, I have worked out the following code which is working fine, i have however been asked to add an additional criteria in, but to be honest i am not sure where to start.
Dim Daterng As Long
Dim Daterng1 As Long
Daterng2 = Worksheets("Homepage").Range("k2") 'check date'
Daterng3 =...