如此 如果指定的文字框架中的文字溢出框架中。 只读 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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。