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 a distância horizontal (em pontos) entre a borda esquerda de uma etiqueta de endereçamento personalizada e a borda esquerda da próxima etiqueta de endereçamento. Leitura/gravação único.
Sintaxe
expression. HorizontalPitch
Expressão Uma variável que representa um objeto 'CustomLabel'.
Comentários
Se essa propriedade for alterada para um valor que não seja válido para o layout da etiqueta de endereçamento especificada, ocorrerá um erro.
Exemplo
Este exemplo define o layout de uma etiqueta personalizada existente chamada "Laser labels". A distância horizontal entre a borda esquerda de uma etiqueta e a borda esquerda da próxima etiqueta é definida como 4,19 polegadas (10,475 centímetros).
With Application.MailingLabel.CustomLabels("Laser labels")
.Height = InchesToPoints(2)
.HorizontalPitch = InchesToPoints(4.19)
.NumberAcross = 2
.NumberDown = 5
.PageSize = wdCustomLabelLetter
.SideMargin = InchesToPoints(0.16)
.TopMargin = InchesToPoints(0.5)
.VerticalPitch = InchesToPoints(2)
.Width = InchesToPoints(4)
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.