Método Worksheet.Evaluate (Excel)

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

Sintaxe

expressão. Avaliar (Nome)

expressão Uma variável que representa um objeto de Folha de Cálculo .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Name	Obrigatório	Variant	O nome do objeto, utilizando a convenção de nomenclatura do 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. Utilize qualquer referência a uma única célula na notação de estilo A1. Todas as referências são consideradas como referências absolutas.

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

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

• Referências externas. Utilize o ! operador para fazer referência a uma célula ou a um nome definido noutro livro; por exemplo, Evaluate("[BOOK1.XLS]Sheet1!A1").

• Objetos de Gráfico. Pode especificar qualquer nome de objeto de gráfico, como Legenda, Área de Desenho ou Série 1, para aceder às propriedades e métodos desse objeto. Por exemplo, Charts("Chart1").Evaluate("Legend").Font.Name devolve o nome do tipo de letra utilizado 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.