Ribbon Calendar DatePicker Word 2007-2010

**Excel Fox** · 04-28-2011, 03:53 PM

A word based ribbon calendar. Just created for fun. Feedback would be appreciated

In case you'd like to have this in Excel, raise your hand

And for those of you who are interested in the XML

PHP Code:


<!--Ribbon Examples from ExcelFox.com--> 
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui" onLoad="CalendarLoad"><!--For Excel 2010, use 2009/07 instead of 2006/01--> 
<ribbon> 
<tabs> 
<tab id="tabActiveMonth" label="Calendar" insertAfterMso="TabView" keytip="C"> 
<group id="grpActiveMonth" getLabel="GroupLabel"> 
<box boxStyle="horizontal" id="OuterBoxControl"> 
<box boxStyle="vertical" id="InnerBoxControl"> 
<comboBox 
id="cboMonth" 
screentip="Month" 
supertip="Select the desired month" 
sizeString="XXXXXXXXXXXX" 
onChange="MonthOnChange" 
getItemID="MonthItemID" 
getItemCount="MonthItemCount"
getItemLabel="MonthItemLabel" 
keytip="DM" 
getText="MonthGetText"> 
<!--<item id="cboMonth01" label="Jan"/> 
<item id="cboMonth02" label="Feb"/> 
<item id="cboMonth03" label="Mar"/> 
<item id="cboMonth04" label="Apr"/> 
<item id="cboMonth05" label="May"/> 
<item id="cboMonth06" label="Jun"/> 
<item id="cboMonth07" label="Jul"/> 
<item id="cboMonth08" label="Aug"/> 
<item id="cboMonth09" label="Sep"/> 
<item id="cboMonth10" label="Oct"/> 
<item id="cboMonth11" label="Nov"/> 
<item id="cboMonth12" label="Dec"/>--> 
</comboBox> 
<comboBox 
id="cboYear" 
screentip="Month" 
supertip="Select the desired month" 
sizeString="XXXXXXXXXXXX" 
onChange="YearOnChange" 
getItemID="YearItemID" 
getItemCount="YearItemCount" 
getItemLabel="YearItemLabel" 
keytip="DY" 
getText="YearGetText"> 
<!--<item id="cboYear12" label="2010"/> 
<item id="cboYear11" label="2011"/> 
<item id="cboYear10" label="2012"/> 
<item id="cboYear09" label="2013"/> 
<item id="cboYear08" label="2014"/> 
<item id="cboYear07" label="2015"/> 
<item id="cboYear06" label="2016"/> 
<item id="cboYear05" label="2017"/> 
<item id="cboYear04" label="2018"/> 
<item id="cboYear03" label="2019"/> 
<item id="cboYear02" label="2020"/> 
<item id="cboYear01" label="2021"/>--> 
</comboBox>
<comboBox
sizeString="XXXXXXXXXXXX" getText="DateTypeGetText" 
id="cboDateType" onChange="DateTypeOnChange">
<item id="itmDT01" label="General Date"/> 
<item id="itmDT02" label="Long Date"/> 
<item id="itmDT03" label="Short Date"/> 
</comboBox>
</box> 
</box> 
<box boxStyle="horizontal" id="Box1"> 
<box boxStyle="vertical" id="InnerBox01"> 
<toggleButton id="btnWeedDay01" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay01" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay15" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox02"> 
<toggleButton id="btnWeedDay02" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay02" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay16" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox03"> 
<toggleButton id="btnWeedDay03" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay03" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay17" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox04"> 
<toggleButton id="btnWeedDay04" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay04" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay18" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox05"> 
<toggleButton id="btnWeedDay05" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay05" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay19" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox06"> 
<toggleButton id="btnWeedDay06" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay06" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay20" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox07"> 
<toggleButton id="btnWeedDay07" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay07" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay21" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox08"> 
<toggleButton id="btnWeedDay08" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay08" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay22" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox09"> 
<toggleButton id="btnWeedDay09" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay09" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay23" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox10"> 
<toggleButton id="btnWeedDay10" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay10" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay24" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox11"> 
<toggleButton id="btnWeedDay11" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay11" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay25" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox12"> 
<toggleButton id="btnWeedDay12" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay12" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay26" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox13"> 
<toggleButton id="btnWeedDay13" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay13" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/>
<toggleButton id="btnDay27" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox14"> 
<toggleButton id="btnWeedDay14" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction"/> 
<toggleButton id="btnDay14" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
<toggleButton id="btnDay28" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip"/> 
</box> 
<box boxStyle="vertical" id="InnerBox15"> 
<toggleButton id="btnWeedDay15" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction" getVisible="DayVisible"/> 
<toggleButton id="btnFalseDay01" label="X" enabled="false" getVisible="DayVisible"/> 
<toggleButton id="btnDay29" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip" getVisible="DayVisible"/> 
</box> 
<box boxStyle="vertical" id="InnerBox16"> 
<toggleButton id="btnWeedDay16" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction" getVisible="DayVisible"/> 
<toggleButton id="btnFalseDay02" label="X" enabled="false" getVisible="DayVisible"/> 
<toggleButton id="btnDay30" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip" getVisible="DayVisible"/>
</box> 
<box boxStyle="vertical" id="InnerBox17"> 
<toggleButton id="btnWeedDay17" getLabel="WeekDayLabel" getPressed="WeekDayPressed" onAction="WeekDayOnAction" getVisible="DayVisible"/> 
<toggleButton id="btnFalseDay03" label="X" enabled="false" getVisible="DayVisible"/> 
<toggleButton id="btnDay31" getLabel="DayLabel" getPressed="DayPressed" onAction="DayAction" getKeytip="DayGetKeyTip" getVisible="DayVisible"/>
</box> 
</box> 
</group> 
</tab> 
</tabs> 
</ribbon> 
</customUI>

https://www.youtube.com/channel/UCnxwq2aGJRbjOo_MO54oaHA

**Ian McDonald** · 07-27-2011, 01:20 AM

**littleiitin** · 09-06-2011, 07:56 AM

**aselim** · 10-20-2012, 10:55 PM

Yes, nice application.

**Rick Rothstein** · 10-22-2012, 09:41 PM

Originally Posted by Excel Fox

In case you'd like to have this in Excel, raise your hand

**Excel Fox** · 10-28-2012, 11:13 PM

Rick, I'll get back to you on this one.

**Excel Fox** · 11-01-2012, 12:04 AM

And the Excel ribbon based date picker! Tested in 2007. Should work in 2010 as well. May not work in any higher version. Feedback is welcome.

**Rick Rothstein** · 11-01-2012, 01:34 AM

Originally Posted by Excel Fox

And the Excel ribbon based date picker! Tested in 2007. Should work in 2010 as well. May not work in any higher version. Feedback is welcome.

This is a great concept and I really like it! Here are some immediate reaction comments (in no particular order of importance)...

1. Selecting the month sometimes shows the next month until you click a day number. For example, with Octboer 31, 2012 selected, choose February from the month drop-down... March displays as the month... click a day number and it corrects itself to February.

2. Visual thing... On my copy of XL2007, the day numbers do not seem evenly spaced across their rows (1 and 2 seem further apart than 2 and 3; 5 and 6 seem further apart than 6 and 7, and there is a couple more examples as well).

3. When the year drop-down is opened, can the current year be position in the middle of the list rather than at the bottom of the list? I think that would be handier as most new selections for the year will usually be within a few years either side of the current year.

4. Can you change the functioning of the date format button to allow the user to type in his own format pattern? I think it would be useful if I could specify, say, d-mmm-yy directly in the text field for the date format button rather than to have to custom format the cell individually.

**Excel Fox** · 11-01-2012, 01:49 AM

Excellent feedback! I'll see what I can do about those Rick.

And I'm happy you liked it. I didn't really give much credit to this when I was developing this last year, and I didn't particularly like the layout (still don't), as the Ribbon doesn't support more than 3 rows of elements. But I did think that someone would find it handy (90+ downloads isn't bad!).

**Excel Fox** · 11-01-2012, 01:57 AM

Tried to replicate the first point, but I couldn't. I tried quite a few other possibilities, but it seems that any change to the month or year drop-down always (and I mean always) select day 1 of that month. Can you check that again and let me know Rick?