Compartilhar via

Método ChartData.Activate (Word)

  • Artigo

Ativa a primeira janela da pasta de trabalho associada ao gráfico.

Sintaxe

expressão. Ativar

Expressão Uma variável que representa um objeto 'ChartData'.

Comentários

Se o gráfico estiver ligado a uma planilha do Microsoft Excel, este método não executará nenhuma macro Ativar_auto ou Desativar_auto que possam estar anexadas à planilha (use o método RunAutoMacros para executar essas macros).

Observação

[!OBSERVAçãO] Você deve chamar esse método antes de fazer referência à propriedade Workbook.

Exemplo

O exemplo a seguir ativa a pasta de trabalho do Excel associada ao primeiro gráfico do documento ativo. Se a pasta de trabalho do Excel tiver várias janelas, o exemplo ativará a primeira janela. Em seguida, o exemplo copiará o conteúdo das células de B1 até B5 e colará o conteúdo das células no gráfico.

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

Confira também

Objeto ChartData

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.