Dave
Sat Mar 15 11:06:02 CDT 2008
I don't know.
You could use an inputbox and ask the user to type in a date, though.
Dim myDate as date
mydate = application.inputbox(Prompt:="Enter a date",type:=1)
if mydate = 0 then
exit sub
else
with activesheet.range("a1")
.numberformat = "mmmm dd, yyyy"
.value = mydate
end with
end if
========
If you really meant that you wanted to use a userform that contained a calendar
control to get the date, then check out Ron's site.
WLMPilot wrote:
>
> Thanks. However, I would prefer to use the Inputbox. How can I use a
> calender to select a date as input on an inputbox?
>
> Les
>
> "Dave Peterson" wrote:
>
> > If you're going to use the calendar control, you won't need the inputbox.
> >
> > Ron de Bruin has some notes here:
> >
http://www.rondebruin.nl/calendar.htm
> >
> > WLMPilot wrote:
> > >
> > > I have added Calender Control 10.0 as an add-in. I want to allow the user to
> > > use a calender to select a date for input via Inputbox. Once the date is
> > > selected and entered, a macro is going to use the date.
> > >
> > > I have no clue how to activate/use the calender control. How is this
> > > accomplished?
> > >
> > > Thanks,
> > > Les
> >
> > --
> >
> > Dave Peterson
> >
--
Dave Peterson