Envelope.FeedSource-Eigenschaft (Word)
Gibt den Papierschacht für den Briefumschlag zurück oder legt ihn fest. WdPaperTray-Wert mit Lese-/Schreibzugriff.
expression. FeedSource
Ausdruck: Erforderlich. Eine Variable, die ein Envelope-Objekt darstellt.
In diesem Beispiel wird der Benutzer gefragt, ob Briefumschläge vom Drucker manuell eingezogen werden. Bei einer positiven Antwort wird im Beispiel der Papierschacht auf manuellen Umschlageinzug festgelegt.
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
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.