Chart.Paste (Word)

Cola dados de gráfico da Área de Transferência para o gráfico.

Paste (Type)

Type: Especifica as informações de gráfico a serem coladas se um gráfico estiver na Área de Transferência. Pode ser um destes valores:

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.ChartData.Activate 
 .Chart.ChartData.Workbook. _ 
 Worksheets("Sheet1").Range("B1:B5").Copy 
 .Chart.Paste 
 End If 
End With