Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt einen Single-Wert zurück, der den Abstand (in Punkt) der Postleitzahl des Absenders von der Oberkante des Umschlags repräsentiert, oder legt diesen fest. Lese-/Schreibzugriff.
Ausdruck. SenderPostalfromTop
Ausdruck Ein Ausdruck, der ein Envelope-Objekt zurückgibt.
Verwenden Sie diese Eigenschaft für Umschläge in asiatischer Sprache.
In diesem Beispiel wird überprüft, ob es sich bei dem aktiven Dokument um ein Briefumschlagdokument für Serienbriefe handelt, das für vertikale Schrift formatiert ist. Wenn das der Fall ist, werden die Absender- und Empfängerangaben entsprechend positioniert.
Sub NewEnvelopeMerge()
With ActiveDocument
If .MailMerge.MainDocumentType = wdEnvelopes Then
With ActiveDocument.Envelope
If .Vertical = True Then
.RecipientNamefromLeft = InchesToPoints(2.5)
.RecipientNamefromTop = InchesToPoints(2)
.RecipientPostalfromLeft = InchesToPoints(1.5)
.RecipientPostalfromTop = InchesToPoints(0.5)
.SenderNamefromLeft = InchesToPoints(0.5)
.SenderNamefromTop = InchesToPoints(2)
.SenderPostalfromLeft = InchesToPoints(0.5)
.SenderPostalfromTop = InchesToPoints(3)
End If
End With
End If
End With
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.