Sub InsertDatetUntilToday()
' coded by: siti Vi / Jakarta, May 16, 2011
'---
Dim SeleDate As Date, DiffDate As Long, n As Long
Do While ActiveCell > 0
If IsDate(ActiveCell) And ActiveCell < Date Then
If Not IsEmpty(ActiveCell(2, 1)) T
Hi all
I hope someone can help with this.
My data is in columns A to F with the short date being in column B.
The data is sorted in date order and the first date that appears in
column B is 23/12/2002 and the next row contains the date 14/01/2002.
What I need is for a macro to look at the first
