AddressFromLeft Property Example
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 left edge of the envelope and the delivery address to 3.75 inches.
addr = "James Allard" & vbCr & "123 Skye St." & vbCr _
& "Our Town, WA 98004"
retaddr = "Rich Andrews" & vbCr & "123 Main" & vbCr _
& "Other Town, WA 98004"
With Documents.Add.Envelope
.Insert Address:=addr, ReturnAddress:=retaddr
.AddressFromLeft = InchesToPoints(3.75)
End With
ActiveDocument.ActiveWindow.View.Type = wdPrintView