ワードのマクロにおけるPrintOut

マクロで、ワード文書を印刷しようとしています。
普通に Application.PrintOut で、印刷はできるのですが、
From,To,Copiesを指定しようとすると、構文エラーとかが、出てきます。

Application.PrintOut From:=1,To:=2,Copies:=1
Application.PrintOut( From:=1,To:=2,Copies:=1)

いずれも、うまく行っていません。
サジェスチョンをお願い致します。

尚、環境は　Windows10,Office2010です。
本当は、Excel2010からWordをコントロールしていますが、
まずは、Word自体で、うまく行っていない状況です。

No.1 ベストアンサー 回答者： enunokokoro 回答日時： 2015/11/12 23:06

PrintOutメソッドにてFromとToを使う場合は、RengeでwdPrintFromToを

指定して数値を文字列として指定する必要があります。
https://msdn.microsoft.com/ja-jp/library/office/ …

ActiveDocument.PrintOut Range:=wdPrintFromTo, From:="2", To:="3"

これ以外でもRangeでWdPrintOutRange 列挙を指定することで、様々な
指定ができます。
https://msdn.microsoft.com/JA-JP/library/office/ …

例えば、ページ範囲なら
ActiveDocument.PrintOut Range:=wdPrintRangeOfPages, Pages:="2-3"
と書きます。


[印刷]ダイアログを出したものでマクロ記録したものが、以下のように
記録されます。

Sub 印刷指定()
'
Application.PrintOut FileName:="", _
　Range:=wdPrintRangeOfPages, _
　Copies:=2, _
　Pages:="1-2", _
' これ以降も省略可能
　Item:= wdPrintDocumentContent, _
　PageType:= wdPrintAllPages, _
　ManualDuplexPrint:=False, _
　Collate:=True, Background:= True, _
　PrintToFile:=False, _
　PrintZoomColumn:=0, _
　PrintZoomRow:=0, _
　PrintZoomPaperWidth:=0, _　
　PrintZoomPaperHeight:=0

End Sub

この回答へのお礼

enunokokoroさん
ありがとうございます。
「マクロ記録」をすればよいのですね。
うっかりしておりました。
Excelでの表記との比較から、こんがらかって、基本を忘れておりました。

マクロの製作は、うまく進んでおります。
ありがとうございます。

Excelからのコントロールで、時々、ワードがビジーだとかで
マクロが止まってしまうことが今の問題です。

兎に角、ありがとうございました。

お礼日時：2015/11/13 22:25