Método Chart.Evaluate (Excel)

Converte um nome do Microsoft Excel em um objeto ou em um valor.

Sintaxe

mais simples. Avaliar (Nome)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Name	Obrigatório	Variant	O nome do objeto, usando a convenção de nomenclatura do Microsoft Excel.

Valor de retorno

Variant

Comentários

Os tipos de nomes a seguir no Microsoft Excel podem ser usados com este método:

• Referências no estilo A1. Use qualquer referência a uma única célula em notação de estilo A1. Todas as referências são consideradas como referências absolutas.

• Intervalos. Use os operadores de intervalo, interseção e união (dois-pontos, espaço e vírgula, respectivamente) com referências.

• Nomes definidos. Você pode especificar qualquer nome na linguagem da macro.

• Referências externas. Use o ! operador para se referir a uma célula ou a um nome definido em outra pasta de trabalho; Por exemplo, Evaluate("[BOOK1.XLS]Sheet1!A1").

• Objetos de gráfico. Você pode especificar qualquer nome de objeto de gráfico, como Legenda, Área de Plotagem ou Série 1, para acessar as propriedades e os métodos desse objeto. Por exemplo, Charts("Chart1").Evaluate("Legend").Font.Name retorna o nome da fonte usada na legenda.

O uso de colchetes (por exemplo, "[A1:C5]") é idêntico a chamar o método Evaluate com um argumento de cadeia de caracteres. Por exemplo, os pares de expressões a seguir são equivalentes.

[a1].Value = 25 
Evaluate("A1").Value = 25 
 
trigVariable = [SIN(45)] 
trigVariable = Evaluate("SIN(45)") 
 
Set firstCellInSheet = Workbooks("BOOK1.XLS").Sheets(4).[A1] 
Set firstCellInSheet = _ 
 Workbooks("BOOK1.XLS").Sheets(4).Evaluate("A1")

A vantagem de usar colchetes é que o código fica menor. A vantagem do uso de Evaluate é que o argumento é uma cadeia de caracteres, de modo que você pode construir a cadeia em seu código ou usar uma variável do Visual Basic.

Exemplo

Este exemplo ativa a formatação em negrito na célula A1 na Planilha1.

Worksheets("Sheet1").Activate 
boldCell = "A1" 
Application.Evaluate(boldCell).Font.Bold = True

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.