Calendar control

  • Thread starter Thread starter cufc1210
  • Start date Start date
C

cufc1210

I have a workbook with different sheets each sheet has its own calendar in
Ce11 A1:A2500

I set the calendar up and copy my sub into VBA and it works fine but after i
exit the workbook then go back in the calendars are all different sizes some
you cant even see tha dates.

is there a way I can prevent this from happening so they all saty the same
size and readable

Cheers in advance
 
You really have 2500 separate calendar controls on each sheet?

Why not have just one control which you call out for the cell you select on
any sheet?

Ron de Bruin shows you how at this site. You will have to edit the range
upon which it operates. Currently set at A1:A20

http://www.rondebruin.nl/calendar.htm

To have the code for all worksheet do not place the
worksheet_selectionchange code in each sheet.

Place it in Thisworkbook module and change the event type.

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)


Gord Dibben MS Excel MVP
 
Sorry Gordon

I just realised that i didnt word that very well, i do only have one
calender control per sheet i meant when i click on cells A1:A2500 the
calensdar appears thanks for the help anyways
 
Just change Ron's code range to A1:A2500


Gord

Sorry Gordon

I just realised that i didnt word that very well, i do only have one
calender control per sheet i meant when i click on cells A1:A2500 the
calensdar appears thanks for the help anyways
Click to expand...
 
Back
Top