I've got a sub that runs a series of calculations, many of which are
based off a "MonthEndDate."

Currently, I input a date (like 9/30/05) in cell D4 and the first line
of code is:

'This row will be used in many other calculations
Range("D4").Name = "MonthEndDate"

This works fine for me as I know that I've got to enter a date in cell
D4, but if someone else is using the spreadsheet they don't know that.

What I'd like to do is, when the sub runs, have an inputbox appear, the
user enters a date and that date is used in the calculations. I guess
that value has to be pasted somewhere in the workbook for the formulas
to work?

This is all I've got... as you can see I'm stuck
Sub test1()

Dim EndDate As Long
EndDate = InputBox("Enter the Month Ending Report Date.", "End
Date")

End Sub

Best,

JB


--
hindsight
------------------------------------------------------------------------
hindsight's Profile: http://www.excelforum.com/member.php...fo&userid=6360
View this thread: http://www.excelforum.com/showthread...hreadid=478963