Propriedade Envelope.AddressFromTop (Word)
Retorna ou define a distância (em pontos) entre a borda superior do envelope e o endereço do destinatário. Leitura/gravação único.
Sintaxe
expression. AddressFromTop
Expressão Uma variável que representa um objeto 'Envelope'.
Comentários
Se você usar essa propriedade antes que um envelope seja adicionado ao documento, ocorrerá um erro.
Exemplo
Este exemplo cria um novo documento e adiciona um envelope com um endereço do destinatário e um endereço do remetente predefinidos. Em seguida, o exemplo define a distância entre a borda superior do envelope e o endereço do destinatário como 1,75 polegada (4,45 cm) e define a distância entre a borda esquerda do envelope e o endereço do destinatário como 3,75 polegadas (9,52 cm).
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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.