Propriedade TextFrame.Overflowing (Word)
True se o texto dentro do quadro de texto especificado não caibam todos dentro do quadro. Boolean somente leitura.
Sintaxe
expression. Overflowing
Expressão Uma expressão que retorna um objeto TextFrame .
Exemplo
Este exemplo verifica se o texto de MyTextBox está excedendo seu quadro de texto. Em caso afirmativo, adicionará outra caixa de texto e vinculará as duas caixas de texto para que o texto flua para a caixa seguinte.
Set myTBox = ActiveDocument.Shapes("MyTextBox")
If myTBox.TextFrame.Overflowing = True Then
Set nextTBox = ActiveDocument.Shapes. _
AddTextbox(msoTextOrientationHorizontal, 72, 72, 100, 200)
MyTBox.TextFrame.Next = nextTBox.TextFrame
End If
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.