複製一張圖表。
語法
表情。抄
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 支援與意見反應。