VBA print push button, but to print setup, not print preview

Question

Private Sub CommandButton2_Click()
Application.Calculate
Sheet3.Visible = True
Sheet3.PrintOut preview:=True
Sheet3.Visible = False
End Sub

This code cu