insert dates
Many thanks for your help
Alvin
"ben" wrote:
this is assuming range A1 & B1 are your two entry fields
Sub tofromdate()
Dim cou As Double
ActiveSheet.Range("I1").Select
For cou = ActiveSheet.Range("A1") To ActiveSheet.Range("B1")
ActiveCell.NumberFormat = "m/d/yyyy"
ActiveCell = cou
ActiveCell.Offset(1, 0).Activate
Next
End Sub
--
When you lose your mind, you free your life.
"alvin Kuiper" wrote:
Hi
Can i do this:
Have a form with 2 fields.
In this two fields i write 2 dates
then i want to make dates in a sheet from the first date to the second date
So if i write 01-01-2006 in the first
and 04-30-2006 ind the second
excel makes i a collum rows from 01-01-2006 to 04-30-2006
regards
Alvin
|