Propriedade TextFrame2.MarginTop (Office)

Retorna ou define a distância (em pontos) entre a parte superior do quadro de texto e a parte superior do retângulo inscrito da forma que contém o texto. Leitura/gravação.

Sintaxe

expressão. MarginTop

Expressão Uma expressão que retorna um objeto TextFrame2 .

Exemplo

O código a seguir adiciona um retângulo a um slide, adiciona texto ao retângulo e define as margens do quadro de texto.

Set pptSlide = ActivePresentation.Slides(1) 
With pptSlide.Shapes.AddShape(msoShapeRectangle, 0, 0, 250, 140).TextFrame2 
 .TextRange.Text = "Here is some sample text" 
 .MarginBottom = 10 
 .MarginLeft = 10 
 .MarginRight = 10 
 .MarginTop = 10 
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.