删除与指定形状相关的文本。
expression.DeleteText
expression 必选。该表达式返回一个 TextFrame 对象。
如果 myDocument 中的第二个形状包含文本,则本示例删除该文本。
myDocument
Set myDocument = ActivePresentation.Slides(1) myDocument.Shapes(2).TextFrame.DeleteText