Compartilhar via


Método Worksheet.Assess (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 Worksheet .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Name Obrigatório Variantes O nome do objeto, usando 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. Use 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. Use os operadores range, intersect e union (colon, space 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 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.