Freigeben über


Envelope.FeedSource-Eigenschaft (Word)

Gibt den Papierschacht für den Briefumschlag zurück oder legt ihn fest. WdPaperTray-Wert mit Lese-/Schreibzugriff.

Syntax

expression. FeedSource

Ausdruck: Erforderlich. Eine Variable, die ein Envelope-Objekt darstellt.

Beispiel

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

Siehe auch

Envelope-Objekt

Support und Feedback

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.