Can I create a dropdown that will show a 2-month calendar?

V

Vecchia

I would like to have a drop down that shows 2 months for the user to select a
specific date. Is that possible?
 
O

optionbase1

Can help you with one month drop-down .... :) not sure this is you
answer :( ...

Create a blank userform and place the DTPicker control as the onl
control (DTpicker may be on your controls TOOLBOX menu; if no
right-click on the TOOLBOX select Additional Controls and locat
DTpicker)

you need to initialise the userform :

Private sub Userform_Activate()
Me.DTpicker.value = Date
end sub

and also set an event for the DTpicker control ( I have this set t
record the selected date then hide the userform):

Private Sub DTpicker1_Closup()
Activecell = DTpicker.value
UserForm1.hide
End sub


I have then a simple calling macro (triggered by a keyboard shortcut
that has a single line :

Userform1.show

- hit the shortcut to show the dialogbox, select the date and it i
entered in the activecell;

you could use the Calander control if you prefer the look but this i
still one month only ...

Don't know how to make this display 2 months together; any idea
anyone? :confused
 
Top