Little out of touch with where VB went. Anyone know what the modern equivalent is?
"Don't think of them as problems, think of them as opportunities."
"OK, I think I've hit an insurmountable opportunity!"
A social community of enthusiasts, owners, appreciators and collectors. With expert knowledge of all things from MG to Rover and beyond.
Private Sub Workbook_Open()
On Error Resume Next
ThisDay = DateValue(Date)
T = 0
Do While ActiveCell.Offset(T, 0).Value <> ThisDay
T = T + 1