ReturnAddressFromLeft 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 return address to 0.75 inch.

addr = "Karin Gallagher" & vbCr & "123 Skye St." _
    & vbCr & "Our Town, WA  98004"
retaddr = "Don Funk" & vbCr & "123 Main" _
    & vbCr & "Other Town, WA  98040"
With Documents.Add.Envelope
    .Insert Address:=addr, ReturnAddress:=retaddr
    .ReturnAddressFromLeft = InchesToPoints(0.75)
End With
ActiveDocument.ActiveWindow.View.Type = wdPrintView