form wont show?
 

greeting all,
I have a user form which i would like to pop up when
a button is clicked. I have the button on the sheet.
I am using the following code.

Private Sub CmdShowCal_Click()
CalForm.Show 0
AppActivate Application.Caption
End Sub

When i click the button, i get a runtime error...
Run-time error '-2147024809(80070057)
Could not find the specified object

odd thing is that it was working. I was modifing some
code in the form (not the CmdShowCal code) and when
i saved the file to retain changes, the runtime error
started poping up instead of the form.
The modification i did was to add 2 dim to 1 private sub
in preperation for adding more code.

Does anyone have some idea what is wrong?
thanks in advance to anyone who can help.