Auto populate date VBA code
Hi,
Am Thu, 24 Jan 2013 14:48:19 +0000 schrieb Keyrookie:
I copied this code exactly as you have it and inserted a date but
nothing happened. I then substituted "Linear" for "Choose Date" and
still nothing. Am I missing something?
if you want to do it with VBA then try (modify to suit):
Sub Test()
Dim StopVal As Long
Dim myYear As Integer
myYear = 2013
StopVal = DateSerial(myYear, 12, 31)
[A1] = DateSerial(myYear, 1, 1)
Range("A1").DataSeries Rowcol:=xlColumns, _
Type:=xlChronological, Date:=xlDay, Step:=1, _
Stop:=StopVal, Trend:=False
End Sub
Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2
|