Envelope.AddressFromTop property (Word)
Returns or sets the distance (in points) between the top edge of the envelope and the delivery address. Read/write Single.
expression A variable that represents a 'Envelope' object.
If you use this property before an envelope has been added to the document, an error occurs.
This example creates a new document and adds an envelope with a predefined delivery address and return address. The example then sets the distance between the top edge of the envelope and the delivery address to 1.75 inches and sets the distance between the left edge of the envelope and the delivery address is set to 3.75 inches.
Dim strAddress As String Dim strReturn As String
strAddress = "Michael Bunney" & vbCr & "123 Skye St." & vbCr _ & "Our Town, WA 98040" strReturn = "Kate Dresen" & vbCr & "123 Main" & vbCr _ & "Other Town, WA 98040" With Documents.Add.Envelope .Insert Address:=strAddress, ReturnAddress:=strReturn .AddressFromTop = InchesToPoints(1.75) .AddressFromLeft = InchesToPoints(3.75) End With ActiveDocument.ActiveWindow.View.Type = wdPrintView
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.