PowerPoint VBA教程:InsertAfter方法

在指定文本区域的末尾附加一个字符串。返回一个代表附加文本的 TextRange对象。省略参数时,该方法返回一个在指定区域末尾的长度为零的字符串。

expression.InsertAfter(NewText)

expression  必选。该表达式返回一个 TextRange对象。

NewText  可选,String 类型。要插入的文本。默认值为空字符串。

VBA示例

本示例将字符串“: Test version”附加到活动演示文稿第一张幻灯片标题的末尾。


With Application.ActivePresentation.Slides(1).Shapes(1)
    .TextFrame.TextRange.InsertAfter ": Test version"
End With

本示例将剪贴板的内容添加到第一张幻灯片标题的末尾。


Application.ActivePresentation.Slides(1).Shapes(1).TextFrame _
    .TextRange.InsertAfter.Paste

上页:PowerPoint VBA教程:Insert方法 下页:PowerPoint VBA教程:InsertBefore方法

PowerPoint VBA教程:InsertAfter方法

PowerPoint VBA教程:InsertBefore方法 PowerPoint VBA教程:InsertDateTime方法
PowerPoint VBA教程:InsertFromFile方法 PowerPoint VBA教程:InsertSlideNumber方法
PowerPoint VBA教程:InsertSymbol方法 PowerPoint VBA教程:Item方法
PowerPoint VBA教程:LargeScroll方法 PowerPoint VBA教程:Last方法
PowerPoint VBA教程:Lines方法 PowerPoint VBA教程:Load方法
PowerPoint VBA教程:LtrRun方法 PowerPoint VBA教程:Merge方法
PowerPoint VBA教程:MoveAfter方法 PowerPoint VBA教程:MoveBefore方法
PowerPoint VBA教程:MoveNode方法 PowerPoint VBA教程:MoveTo方法
PowerPoint VBA教程:Name方法 PowerPoint VBA教程:NewWindow方法
PowerPoint VBA教程:Next方法 PowerPoint VBA教程:NextNode方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号