Help with selecting first day of month

[justchris]

I have a form set up with a listbox which is filled with dates, from the first of the year to the last of the year. I have a command button that on click sends the selected date from the listbox to sheet1 cell b1. What I would like to do is onclick send the selected date to b1 like it already does, but ALSO put the first of the selected month into cell a1.


Example's:

I select 03/03/05. on click it sends it to cell b1 as 03/03/05 and in cell a1 it writes 03/01/05. Or if i pick any other day in march it puts march first in cell a1.
The same goes for all months. If i pick a day in december i need december first to go into cell a1.

Any help would be great.
Thanks
Chris

[Leith Ross]

Hello Chris,

Y = Year(Range("B1"))
M = Month(Range("B1"))
D = 1

Range("A1").Value = Format(M &"/" & D &"/" & Y, "mm/dd/yy")

Hope this answers your question,
Leith Ross

[justchris]

Well, That does break it down a bit. I'll play with it and see what kind of if statements I can come up with.

I was hoping there was an if statement i could use with cell b1. If cell b1's month is x then cell a1 = x/1/05. Like i said though, I'll play with it and see what i can do using that breakdown.
Thanks
Chris

[justchris]

OH! Nice... Thank you! I see how it works now, sorry i replied before i played with it... That solves another problem i was going to run into with the year.



Thanks