はじめまして。いつも参考にさせて頂いています。
よろしくお願いします。

Adobe PDF のプリンタドライバでPDFデータを作成しています。

Printer.PaperSizeの指定でエラーが発生します。
普通のプリンターでは指定できるのですが...
---------------------------------------------------
Printer.PaperSize = vbPRPSB5 ← ここでエラー
実行時エラー '380'
プロパティの値が不正です。
---------------------------------------------------
A1、A2 など様々なサイズで作成したいのですが、やはり
Printer.PaperSize = vbPRPSUser ←ここでエラー
同じエラーになってしまいます。
---------------------------------------------------
Printer.PaperSizeを指定せずに
プリンタの設定ダイアログから用紙を指定しても、
ドライバの印刷設定の用紙で作成されてしまいます。
---------------------------------------------------

対処や別の印刷(作成)方法がありましたら教えて下さい
よろしくお願いします。

※ Windows2000,XP / VB6.0SP5
※ Adobe ACROBAT 6.0 のプリンタドライバ(Adobe PDF Converter)を使っています。

> Printer.PaperSizeの指定でエラーが発生します。
Printerオブジェクトのプロパティは、必ずしも全てのプリンタで
サポートされているわけではなく、ドライバ側の実装如何によって、
設定しても無視されたり、エラーになったりする可能性があるそうです。

> プリンタの設定ダイアログから用紙を指定しても、
> ドライバの印刷設定の用紙で作成されてしまいます。
環境が無いので、こちらでは状況を確認する事ができませんが、
adobeのサイトを見る限り、用紙指定自体は可能らしいですけれどね。
hhttp://support.adobe.co.jp/faq/qadoc/AJ25.nsf/900f7bf03cd385244925696900084026/1363c2364d69e5
4f49256e4c0018967d?OpenDocument

プリンタの設定ダイアログは、CommonDialog1.ShowPrinter で開いているのでしょうか。
その場合、PrinterDefault や Flags の値は、どのように設定していますか?

ありがとうございます。

> プリンタの設定ダイアログは、CommonDialog1.ShowPrinter で開いているのでしょうか。
> その場合、PrinterDefault や Flags の値は、どのように設定していますか?

はい、.ShowPrinter で開いています。
PrinterDefaultは指定していません。(True)
Flagsはプリンタの設定ダイアログです。

CommonDialog1.CancelError = True
CommonDialog1.Flags = cdlPDPrintSetup
CommonDialog1.ShowPrinter

PaperSizeの値が、「AdobePDF」ではVBの定数と違うようです。
ちなみに、B5は '128' でした。

commomDialogではダイアログで設定した用紙サイズを取得できない為、
API関数(PrintDlgA)を使って知りました。

初めてAPI関数を使ったのですが、
構造体の説明等、読んでもまったく理解できず．．．
とても日本語とは思えない．．．