Word) (TextFrame.Overflowing 属性

如此 如果指定的文字框架中的文字溢出框架中。 只读 Boolean。

语法

expression。 Overflowing

表达 返回 TextFrame 对象的表达式。

示例

本示例检查 MyTextBox 中的文本是否超出其文本框架。 如果超出，本示例将添加另一个文本框架并链接这两个文本框，以使文本排入第二个文本框架。

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

另请参阅

TextFrame 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。