Excelのエラーで困っています。

Excelで困っていることがあります。
印刷をしようとすると「コンパイルエラーです：名前付き引数が見つかりません。」と表示されるのですが、解決方法はありませんか？
使っているPCはMac book airで、なぜかWindowsだと問題なく印刷できます。

質問者からの補足コメント

• 補足ですが、シートにこのようなボタンがあり、ボタンを押して印刷をするようになっています。

  
    補足日時：2016/06/17 11:14

• コードは以下です。

  
    補足日時：2016/06/17 11:51

No.5 ベストアンサー 回答者： t_fumiaki 回答日時： 2016/06/17 14:58

デフォルトが効いていないようなので、部数指定して下さい。

Sheets("EXPENSE仮払（無）印刷画面").PrintOut Copies:=1

No.4 回答者： t_fumiaki 回答日時： 2016/06/17 13:01

判別できました。

ボタンを押すとそのvbaが実行されて、複数シートを一括1部印刷、です。
ActiveWindow.SelectedSheets.PrintOut Copies:=1,・・・・
IgnorePrintAreas:=False
の部分でエラーなので、そこを以下の様に修正します。

Sheets("EXPENSE仮払（無）印刷画面").PrintOut

この回答へのお礼

ありがとうございます！！！
なんとか印刷は出来たのですが、1部以上印刷されてしまいます...

お礼日時：2016/06/17 13:22

No.3 回答者： hiro_0611 回答日時： 2016/06/16 13:51

Windows版 Excelと Mac版 Excel のそれぞれのバージョンがわかりませんが、要するに、その Windows版 Excelバージョン では使用できるメソッドだけど、そのMac版 Excelバージョンでは使えないからエラーになっていると。

ですから、t_fumiaki さんの仰るとおり、そのMac版 Excelバージョンで動作できると想定されるように修正することです。

No.2 回答者： t_fumiaki 回答日時： 2016/06/16 13:12

>>上のどちらかをコードのどこかにコピーするということですか？

添付文字が小さくて判別しにくいのですが、シート印刷ですよね。

その部分を丸ごと変更してはどうですか？の意味です。
ActiveSheet.PrintOut 　か
Worksheets("シート名")PrintOut
でシート印刷出来ます。

見間違えていたら、ご容赦の程を！

No.1 回答者： t_fumiaki 回答日時： 2016/06/16 12:57

Mac内に必要なモジュールが無いからです。

特別な事せず、以下を使って印字して下さい。
ActiveSheet.PrintOut か
Worksheets("シート名")

この回答へのお礼

早速の回答ありがとうございます！！！
ActiveSheet.PrintOut か
Worksheets("シート名")
を使ってというのは、上のどちらかをコードのどこかにコピーするということですか？

お礼日時：2016/06/16 13:03