this will cover teh calanda bit for you
Go to Tools / Macro / VBE
Go to Insert / UserForm from within the VBE.
Open Control Toolbox, if not go to View / Toolbox etc
Right click on the Toolbox and select Additional Controls
Find Calendar Control 10.0 and check the checkbox and click OK
Select the UserForm go to View / Properties Window
Select Caption from the Properties Window and replace:
UserForm1 with the word Calendar (This is critical)
Go to View / Code add the code exactly as show below:
Go to Insert / Module and in a new module copy this code
Bookmarks