View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Brian C[_2_] Brian C[_2_] is offline
external usenet poster
 
Posts: 6
Default Problems with dates entered via userform

I'm trying to create a date range in Excel in a column on
a worksheet I use a userform to enter a start and end
date, copy this data to locations on a worksheet in a
worksheet (in cell A2 and a cell called
A1Enddate respectively on the AutumnHT1 workshet).

I execute the following code when they hit the FINISH
button on the userform:

Sub Macro3()
'
' Macro3 Macro
' Macro recorded 15/04/2004 by blcutler
'
Sheets("AutumnHT1").Select

Range("A2").Select

Selection.DataSeries Rowcol:=xlColumns,
Type:=xlChronological, Date:= _
xlWeekday, Step:=1, Stop:=Range("A1Enddate"), Trend:=False

End Sub


I get the following error:

Run time error 1004

DataSeries method of range class failed

Any ideas of what may be happening? There is defintely
data put in the cells (A2 and A1Enddate) on AutumnHT1 by
the userform. The Userform executes on a different sheet
hence the Sheets("AutumnHT1").Select

The macro works if I enter dates directly into the cells
and then run it rather than using a userform. Whereas via
the userform the 2 fields of data appears as dd/mm/yyyy
when I enter them directly they appear as a 5 digit number
which I assume is what Excel needs. Presumably when data
is enterd via my Sheets("AutumnHT1").Cells(2, 1) =
UserForm1.TB_A1_SDt.Text it does not recognise it as a
date!

I tried Sheets("AutumnHT1").Cells(2, 1).Formula =
UserForm1.TB_A1_SDt.Text but it made no difference