Question

我正在寻找帮助我更好地理解PowerPoing VBA中“.TextFrame”和“.TextRange”对象的信息。有人可以帮忙吗？我已经回顾了MSDN上的内容，我对这里的文档一直感到失望。

Answer 1

形状是PPT幻灯片，大师，布局，笔记页面的基本构建块;他们身上的一切都是一种形状。

某些形状（例如行）不能包含文字。那些可以包含文本的文本具有TextFrame。如果Shape.TextFrame包含文本，则可以使用Shape.TextFrame.TextRange来访问（设置/读取）TextFrame中所有文本的属性。其他方法也返回.TextRange，它可能是.TextFrame中文本的某个子集。

简单示例：

Sub DoSomethingUseless()

Dim oSh as Shape
Dim oSl as Slide

For Each oSl in ActivePresentation.Slides

For Each oSh in oSl.Shapes
   If oSh.HasTextFrame Then
      If oSh.TextFrame.HasText Then
         Debug.Print oSh.TextFrame.TextRange.Text
      End If
   End If
Next   ' Shape

Next   ' Slide

End Sub

PowerPoing VBA中的Shape.TextFrame和.TextRange是什么？

1 个答案: