封筒の用紙トレイを設定または返します。 WdPaperTray を読み取り/書き込み。
構文
式。 FeedSource
expression 必須です。 'Envelope' オブジェクトを表す変数。
例
次の使用例は、プリンターに手差しで封筒を挿入するかどうかをユーザーに確認します。 [はい] がクリックされた場合、用紙トレイを手差しにします。
Sub exFeedSource()
Dim intResponse As Integer
intResponse = _
MsgBox("Are the envelopes manually fed?", vbYesNo)
If intResponse = vbYes then
On Error GoTo errhandler
ActiveDocument.Envelope.FeedSource = _
wdPrinterManualEnvelopeFeed
End If
Exit Sub
errhandler:
If Err = 5852 Then MsgBox _
"Envelope not part of the active document"
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。