problem beim drucken mit vba

ich habe auf einem Tabellenblatt mehrere Userforms die jeweils durch klicken andere Tabellenblätter ausdrucken sollen. Aus irgendwelchen Gründen funktioniert das nicht in jedem Fall. Worauf muss ich noch achten? Kann an den auszudruckenden Blättern was eingestellt sein oder ist mein code nur falsch?

Hier der Code:

Private Sub CommandButton1 Click()
Worksheets("tabelle1").PrintOut
Worksheets("tabelle2").PrintOut
End Sub

mfg jenny