マクロで呼び出したプレビュー画面から印刷できない

質問

マクロで呼び出したプレビュー画面から印刷できない

エクセル2010です。
下記のマクロで呼び出したプレビュー画面から印刷できません。
Sub test()
　　ActiveSheet.PrintPreview
End Sub
で呼び出したプレビュー画面から、印刷するために一番左上の「印刷」をクリックすると
実行時エラー1004
WorksheetクラスのPrintPreviewメソッドが失敗しました。
となってしまいます。
何がわるいのでしょうか？別のパソコンのエクセル2016では問題なく印刷できます。
頭をかかえています。

回答No.1

watabe007 · ベストアンサー

こちらでは
ActiveSheet.PrintOut Preview:=True

お礼

回答をいただいていたことに気づかず、大変失礼いたしました。
ご教示の方法でプレビュー後印刷が出来ました。
ただ、ActiveSheet.PrintPreviewでなんでエラーがでるのかがさっぱりわかりません。ネットワークプリンターを使用しているせいでしょうか？
おなじエクセル２０１０でもプリンター直結のはエラーになりませんでした。

補足

試しに
Dim rtn
rtn=Application.Dialogs(xlDialogPrintPreview).Show
としてみて、プレビュー画面でキャンセルしたらrtnはFALSEを返しましたが、印刷をクリックしたらやはりエラーになり
rtnはEmptyでした。