user forms

[steveshos]

Hi,

I am building a user form for a journal entry sheet. I am trying to use the next index value in user chosen combo field. for example, if the user choices Jan-06 from a combo box, I want the reverse date to be automatically chosen as 'feb-06. any ideas

[Tom Ogilvy]

Dim dt as Date, dt1 as Date
dt = cDate(Combobox1.Value)
dt1 = DateSerial(year(date),month(date)+1,1)
Combobox2.Value = format(dt1,"mmm-yy")


--
Regards,
Tom Ogilvy

"steveshos" <[email protected]> wrote
in message news:[email protected]...
>
> Hi,
>
> I am building a user form for a journal entry sheet. I am trying to
> use the next index value in user chosen combo field. for example, if
> the user choices Jan-06 from a combo box, I want the reverse date to be
> automatically chosen as 'feb-06. any ideas
>
>
> --
> steveshos
> ------------------------------------------------------------------------
> steveshos's Profile:
http://www.excelforum.com/member.php...o&userid=29585
> View this thread: http://www.excelforum.com/showthread...hreadid=492854
>

[steveshos]

I am running into another problem. I want to use the date in a form with the following MM-YY, The combo box is populated with AddITems such as JAN-06, FEB-06. The problem that I am having is that when I do cdate, it is recognizing the dates as january 6, 2005, and february 6, 2005. The research that I have done, says that if a year is not specified, than the year is assumed to be the systems current year. is there a way to specify that JAN-06 that the Jan represents the month, 06 represents the year and the day is missing?