通过

Chart.Paste 方法 (PowerPoint)

将剪贴板中的图表数据粘贴到图表中。

语法

表达式。粘贴 (类型)

expression：一个表示 Chart 对象的变量。

参数

名称 必需/可选 数据类型 说明
Type 可选 Variant 指定要粘贴的图表信息（如果剪贴板中有一个图表）。 可以是下列值之一：
:----- :-----
-4104 粘贴全部内容。 这是默认值。
-4122 粘贴复制的源格式。
-4123 粘贴公式。

示例

注意

[!注释] 尽管下面的代码适用于 Microsoft Word，但您可以轻松地对其进行修改以将其应用于 PowerPoint。

下面的示例激活与活动文档中第一张图表关联的 Microsoft Excel 工作簿。 如果 Excel 工作簿有多个窗口，该示例将激活第一个窗口。 然后该示例将单元格 B1 至 B5 的内容复制并粘贴到图表中。

With ActiveDocument.InlineShapes(1)
    If .HasChart Then
        .Chart.ChartData.Activate
        .Chart.ChartData.Workbook. _
            Worksheets("Sheet1").Range("B1:B5").Copy
        .Chart.Paste
    End If
End With

另请参阅

Chart 对象

支持和反馈

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