Método Chart.Copy (Project)
Copia um gráfico.
expressão. Cópia
expressão Uma variável que representa um objeto Chart.
Variantes
O exemplo a seguir 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
Método CopyPicturedo Objeto Chart
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.