in the printing of the access form get error dialog box

[nuwan1988]

in the printing of the access form using following cord.. get error........

Private Sub CommandBtn_Click()
Dim MyForm As Form
Set MyForm = Screen.ActiveForm
DoCmd.SelectObject acForm, MyForm.Name, True
DoCmd.PrintOut
DoCmd.SelectObject acForm, MyForm.Name, False 
End Sub

the error is...
''the object you referenced in the visual basic procedure as an OLE object isn't an OLE object''

error number- 2950

please give me the solutions.....

[zmbd]

- Version of access?
- See here: > Before Posting (VBA or SQL) Code set the options and debug/compile (repeating after each fix)
- Insert STOP in-between lines 2 and 3 as formatted in the post.
- Run your code
- When you enter break mode at the STOP, use [F8] to step thru the code.
- When you reach the error line: Please post, the numbr of line the error occures and the EXACT title, number, and text of the error message. Please do not alter, omit, nor abbreviate the information provided in the error message