Excel Macro Prompting

[crusse04]

I created an Excel macro to update a worksheet on a monthly basis. The macro
prompts for the Start and Stop dates using the InputBox Method. The problem
I'm having is that the date values will not occupy the designated cells. The
following is what I created:

Dim dtestart As Date
dtestart = InputBox("ENTER START DATE FOR THIS CDRL PERIOD: MM/DD/YYYY")
Worksheets("Configuration").Range("b6").Formula = "dtestart"

Dim dtestop As Date
dtestop = InputBox("ENTER START DATE FOR THIS CDRL PERIOD: MM/DD/YYYY")
Worksheets("Configuration").Range("b7").Formula = "dtestop"

Instead of the dates being input into cells b6 and b7, the strings
"dtestart" and "dtestop" are entered.

Please help! The date (example: 05/31/2008 ) needs to occupy the cell
after it is input.

 

[Harald Staff]

Remove the quotes around the variable names
..Formula = dtestart

HTH. Best wishes Harald

 

[Jim Thomlinson]

Remove the quotes...

Dim dtestart As Date
dtestart = InputBox("ENTER START DATE FOR THIS CDRL PERIOD: MM/DD/YYYY")
Worksheets("Configuration").Range("b6").Formula = dtestart

Dim dtestop As Date
dtestop = InputBox("ENTER START DATE FOR THIS CDRL PERIOD: MM/DD/YYYY")
Worksheets("Configuration").Range("b7").Formula = dtestop