Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna ou define o tamanho de página para a etiqueta de endereçamento personalizada especificada. Leitura/gravação WdCustomLabelPageSize.
Sintaxe
expression. PageSize
expression é obrigatório. Uma variável que representa um objeto 'CustomLabel'.
Comentários
Algumas das constantes WdCustomLabelPageSize podem não estar disponíveis para você, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou.
Exemplo
Este exemplo cria uma nova etiqueta personalizada chamada "Home Address" e define várias propriedades para a etiqueta, incluindo o tamanho da página.
Set myLabel = Application.MailingLabel _
.CustomLabels.Add(Name:="Home Address", DotMatrix:=False)
With myLabel
.Height = InchesToPoints(0.5)
.HorizontalPitch = InchesToPoints(2.06)
.NumberAcross = 4
.NumberDown = 20
.PageSize = wdCustomLabelLetter
.SideMargin = InchesToPoints(0.28)
.TopMargin = InchesToPoints(0.5)
.VerticalPitch = InchesToPoints(0.5)
.Width = InchesToPoints(1.75)
End With
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.