Propriedade Envelope.DefaultSize (Word)

Retorna ou define o tamanho de envelope padrão. Cadeia de caracteres de leitura/gravação.

Sintaxe

expression. DefaultSize

Expressão Uma variável que representa um objeto 'Envelope'.

Comentários

A cadeia de caracteres retornada corresponde ao lado direito da cadeia de caracteres que aparece na caixa Tamanho de Envelope na caixa de diálogo Opções de Envelope. Se você definir a propriedade DefaultHeight ou DefaultWidth , o tamanho do envelope será alterado automaticamente para Tamanho Personalizado na caixa de diálogo Opções de Envelope (menu Ferramentas ) e essa propriedade retornará "Tamanho personalizado".

Exemplo

Este exemplo define o tamanho do envelope padrão como C4 (229 x 324 mm).

ActiveDocument.Envelope.DefaultSize = "C4"

Este exemplo pergunta ao usuário se ele deseja alterar ou não o tamanho de envelope padrão para o Tamanho 10. Se a resposta for sim, o tamanho padrão será alterado. O método UpdateDocument altera o tamanho do envelope do documento ativo. Se um envelope não tiver sido adicionado ao documento ativo, será exibida uma caixa de mensagem.

Sub exDefaultSize() 
 
 Dim intResponse As Integer 
 
 On Error GoTo errhandler 
 intResponse = MsgBox("Do you want to set the " _ 
 & "default envelope to Size 10?", 4) 
 If intResponse = vbYes Then 
 With ActiveDocument.Envelope 
 .DefaultSize = "Size 10" 
 .UpdateDocument 
 End With 
 End If 
 
 Exit Sub 
 
errhandler: 
 If Err = 5852 Then _ 
 MsgBox "An envelope isn't part of this document" 
End Sub

Confira também

Objeto envelope

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.