Chart.Copy 方法 (Project)
复制图表。
语法
表达式。复制
expression:一个表示 Chart 对象的变量。
返回值
Variant
示例
以下示例复制图表,然后将图表作为图片粘贴到活动报表上。
Sub CopyAndPasteChart()
Dim chartShape As Shape
Dim reportName As String
Dim duplicateChart As Chart
reportName = "Simple scalar chart"
Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
chartShape.Chart.Copy
Application.PasteAsPicture
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈