Hi

I have been changing some thing in excel so that my calendar tool dosent
work any more. I get the error message: "Compile Error - User-defined type
not defined" when I open an emthy sheet and the debugger stops at:

PERSONAL.XLS:

Private Sub Workbook_Open()

= Dim NewControl As CommandBarControl

' Assign shortcut to display calendar on SHIFT+CTRL+C
Application.OnKey "+^{C}", "Module1.OpenCalendar"
' Add item to shortcut menu on open
On Error Resume Next
Application.CommandBars("Cell").Controls("Insert Date").Delete
On Error GoTo 0
Set NewControl = Application.CommandBars("Cell").Controls.Add
With NewControl
.Caption = "Insert Date"
.OnAction = "Module1.OpenCalendar"
.BeginGroup = True
End With
End Sub

Any suggestions of how to make this work again would be much appriciated?