Método Chart.Copy (Project)

Copia um gráfico.

Sintaxe

expressão. Copiar

expressão Uma variável que representa um objeto Chart.

Valor de retorno

Variant

Exemplo

O exemplo seguinte copia o gráfico e, em seguida, cola o gráfico como uma imagem no relatório ativo.

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

Confira também

Método CopyPicturedo Objeto de Gráfico

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.