Paste 方法

应用于 Shapes 对象的 Paste 方法。

在 z 顺序的最上端将剪贴板上的形状、幻灯片或文本粘贴到指定 Shapes 集合中。每个粘贴对象都成为指定 Shapes 集合的成员。如果剪贴板包含全部幻灯片，幻灯片将作为包含幻灯片图像的形状粘贴。如果剪贴板包含文本内容，该文本将粘贴到一个新创建的 TextFrame 形状中。返回一个代表粘贴对象的 ShapeRange 对象。

expression.Paste

expression 必选。该表达式返回上述对象之一。

应用于 Slides 对象的 Paste 方法。

将剪贴板上的幻灯片粘贴到演示文稿的 Slides 集合中。指定要在何处使用 Index 参数插入幻灯片。返回一个代表粘贴对象的 SlideRange 对象。每个粘贴的幻灯片都成为指定 Slides 集合的成员。

expression.Paste(Index)

expression 必选。该表达式返回上述对象之一。

Index 可选。Integer 类型。表示剪贴板上的幻灯片要粘贴在其之前的幻灯片索引号。如果省略本参数，剪贴板上的幻灯片将粘贴在演示文稿的最后一张幻灯片后。

应用于 TextRange 对象的 Paste 方法。

将剪贴板上的文本粘贴到指定文本内容中，返回一个代表粘贴文本的 TextRange 对象。

expression.Paste

expression 必选。该表达式返回上述对象之一。

应用于 View 对象的 Paste 方法。

将剪贴板上的内容粘贴到当前视图中。试图将对象粘贴到不接受它的视图中时出现一个错误。有关视图和要粘贴到视图中的对象的信息，请参阅“说明”一节。

expression.Paste

expression 必选。该表达式返回上述对象之一。

说明

将剪贴板内容粘贴到视图之前，请使用 ViewType 属性设置窗口的视图。下列表格显示了对每种视图可以插入的内容。

视图	可插入下列内容
幻灯片视图或备注页视图	形状、文本或整张幻灯片。如果从剪贴板粘贴一个幻灯片，该幻灯片的图像将作为嵌入对象被插入到幻灯片、母版或备注页中；如果选中形状，粘贴的文本将附加到形状文本之后；如果选中文本，粘贴的文本将替换选中的文本；如果选中任何其他对象，粘贴的文本将被放到它自己的文本框中。粘贴的形状将被放到 z 顺序的最上端且不会替换选中的形状。
大纲视图	文本或整张幻灯片。不能向大纲视图粘贴形状。粘贴的幻灯片将被插到插入点所在的幻灯片之前。
幻灯片浏览视图	整张幻灯片。不能向幻灯片浏览视图粘贴形状或文本。粘贴的幻灯片将被插到插入点处或演示文稿中最后选中的一张幻灯片之后。

示例

应用于 Shapes 对象。

本示例将当前演示文稿第一张幻灯片的第一个形状复制到剪贴板，然后将其粘贴到第二张幻灯片。

With ActivePresentation
    .Slides(1).Shapes(1).Copy
    .Slides(2).Shapes.Paste
End With

本示例剪切当前演示文稿第一张幻灯片第一个形状的文本，将其放到剪贴板，然后将其粘贴到同一幻灯片第二个形状第一个字之后。

With ActivePresentation.Slides(1)
    .Shapes(1).TextFrame.TextRange.Cut
    .Shapes(2).TextFrame.TextRange.Words(1).InsertAfter.Paste
End With

应用于 Slides 对象。

本示例从演示文稿“Old Sales”中剪切第三张和第五张幻灯片，然后将它们插入到当前演示文稿第四张幻灯片之前。

Presentations("Old Sales").Slides.Range(Array(3, 5)).Cut
ActivePresentation.Slides.Paste 4

应用于 View 对象。

本示例在第一个窗口中复制选定幻灯片到剪贴板并将其复制到第二个窗口的视图中。如果剪贴板的内容不能粘贴到第二个窗口的视图中（例如：如果试图粘贴一形状到幻灯片浏览视图中）本示例失败。

Windows(1).Selection.Copy
Windows(2).View.Paste

本示例将第一个窗口中选中的内容复制到剪贴板（请确认第一个窗口在幻灯片视图中），然后将剪贴板内容复制到第二个窗口的视图。

Windows(1).Selection.Copy
With Windows(2)
    .ViewType = ppViewSlide
    .View.Paste
End With