Ron;
Thanks very much it is working perfectly!!.
However, I found that when I use it in another computer I have the following
error message:
Run-Time error ‘424’
Object Required
So, I went to Insert/Object at the tools menu and I found that the calendar
is not there.
In addition, I check that Microsoft Access is installed. So and do not how
to get the calendar now. Could you please tell me how to get the calendar?
Thanks in advance.
Maperalia
"Ron de Bruin" wrote:
> You can add one line
>
> Private Sub Calendar1_Click()
> ActiveCell.Value = CDbl(Calendar1.Value)
> ActiveCell.NumberFormat = "mm/dd/yyyy"
> ActiveCell.Select
> Calendar1.Visible = False
> End Sub
>
>
>
> --
>
> Regards Ron de Bruin
> http://www.rondebruin.nl/tips.htm
>
>
> "maperalia" <(E-Mail Removed)> wrote in message news:98988BDE-B4AD-4598-BCB7-(E-Mail Removed)...
> > Yes I do..
> >
> > "Ron de Bruin" wrote:
> >
> >> Do you use the code from my site ?
> >>
> >>
> >> --
> >>
> >> Regards Ron de Bruin
> >> http://www.rondebruin.nl/tips.htm
> >>
> >>
> >> "maperalia" <(E-Mail Removed)> wrote in message news:6B5E76CE-8571-4929-9081-(E-Mail Removed)...
> >> >I inserted a calender option in the cell "C12". It is working very good,
> >> > however, the calender does not desapear it is there all the time. I just want
> >> > the calender to appear when the cell "C12" is selected. Also, I would like to
> >> > calender desapear as soon the date is selected (without pressing enter).
> >> > Thanks in advance.
> >> > Maperalia
> >>
>