るきお様お返事ありがとうございます。
APIの例、ありがとうございます。
自分では動かなかったので、どんな値がでるか期待していました。
でも、VBNETのPAPERSIZEと同じ数でした（用紙の種類は表示がされたりされなかったりで、確実には確認できませんでいたが）
APIで気になっているのが
DC_BINSとDC_BINNAMESで、先に教えて頂いたwebにGETBINNAME()があり、
るきお様の修正してくれたコード

   Dim printer As String

    printer = Application.ActivePrinter

    strDeviceName = Split(printer, " on ")(0)

    strDevicePort = Split(printer, " on ")(1)

 

を使ったところ、トレイ？トレイ名？の出力を確認できました。
今日は複合機群の各出力を確認できず、プリンターダイアログのどれと対応してるのか確認できませんが、
月曜以降確認させて頂きたいと思います。

教えて頂いたC＋＋のサイトは、用紙の例と、出力エラーのスプール残の確認用でしょうか？
スプールが残っていたら、紙が違うという事でしょうか？
複合機側もエラーになっていると思われ、共同作業場（遠隔）では、迷惑かもしれないと思います・・・

また、「実際に印刷可能な用紙の一覧や、セットされている紙はWindowsでは定義されていない情報だと思いますので、プリンタードライバーが独自に定義している場合のみ取得可能です。」
は、残念で、可能な場合の取得も敷居が高そうな話で悲しいです。
「selects the size of the paper to print on」の記載も、教えて頂いたwebのpdfで確認できず、
メーカー次第で悲しいですが、私の希望はかなわないのかもしれません。

月曜以降に少し期待しています。
その際は、また報告します。
大変ありがとうございます。