Propriedade TextFrame.AutoFitText (Publisher)

Define ou devolve uma constante PbTextAutoFitType que representa a forma como o Microsoft Publisher ajusta automaticamente o tamanho do tipo de letra do texto e o tamanho do objeto TextFrame para uma melhor visualização. Leitura/gravação.

Sintaxe

expressão. Ajuste AutomáticoTexto

expressão Uma variável que representa um objeto TextFrame .

Valor de retorno

PbTextAutoFitType

Comentários

O valor da propriedade AutoFitText pode ser uma das constantes PbTextAutoFitType declaradas na biblioteca de tipos do Microsoft Publisher.

Exemplo

O exemplo a seguir testa para ver se o quadro de texto possui texto e, em caso afirmativo, a propriedade AutoFitText é definida como melhor ajuste.

Sub TextFit() 
 
 Dim tfFrame As TextFrame 
 
 tfFrame = Application.ActiveDocument.MasterPages.Item(1).Shapes(1).TextFrame 
 With tfFrame 
 If .HasText = msoTrue Then .AutoFitText = pbTextAutoFitBestFit 
 End With 
 
End Sub

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.