Project) (Chart.Copy 方法

複製圖表。

語法

運算式。複製

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

另請參閱

圖表物件CopyPicture 方法

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。