通过

TextRange.Copy 方法 (Publisher)

  • 项目

将指定对象复制到剪贴板。

语法

表达式。复制

表达 一个代表 TextRange 对象的变量。

返回值

Nothing

注解

使用 Paste 方法粘贴剪贴板中的内容。

Copy 方法可用于 Shape 对象， Paste 方法则不能。

示例

以下示例将当前出版物的第一页上的第一个和第二个形状复制到剪贴板，再将副本粘贴到第二页上。

With ActiveDocument 
 .Pages(1).Shapes.Range(Array(1, 2)).Copy 
 .Pages(2).Shapes.Paste 
End With

以下示例将当前出版物的第一页上的第一个形状复制到剪贴板。

ActiveDocument.Pages(1).Shapes(1).Copy

以下示例将当前出版物的第一页上的第一个形状中的文字复制到剪贴板。

ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange.Copy

支持和反馈

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