Problem printing tab pages

[forest8]

Hello

Through the help of some of the MVP people on this board, I am using the
following code to print tabs:

Main is the tab control on one of my forms.

Private Sub_Print_Form_Click()
Me.Main = 0
DoCmd.PrintOut
Me.Main = 1
DoCmd.PrintOut
Me.Main = 0
DoCmd.PrintOut

End Sub

I get a

Rub-time error '2212':
Microsoft Office Access cannot print your object.

When I print other forms, I don't have this problem.

Thank you for your help in advance.