Método Application.Evaluate (Excel)

Artículo
04/07/2023

Convierte un nombre de Microsoft Excel en un objeto o un valor.

Sintaxis

expresión. Evaluate (Nombre)

expresión Variable que representa un objeto Application.

Parámetros

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Name	Obligatorio	Variant	Una fórmula o el nombre del objeto, con la convención de nomenclatura de Microsoft Excel. El nombre debe incluir 255 caracteres como máximo.

Valor devuelto

Variant

Observaciones

Los siguientes tipos de nombres de Microsoft Excel se pueden usar con este método:

Fórmulas.
Referencias de estilo A1. Use cualquier referencia a una sola celda en la notación de estilo A1. Todas las referencias se consideran referencias absolutas.
Intervalos. Use los operadores de rango, intersección y unión (dos puntos, espacio y coma, respectivamente) con referencias.
Nombres definidos. Puede especificar cualquier nombre en el lenguaje de la macro.
Referencias externas. Use el ! operador para hacer referencia a una celda o a un nombre definido en otro libro; por ejemplo, Evaluate("[BOOK1.XLS]Sheet1!A1").
Objetos chart. Puede especificar cualquier nombre de objeto de gráfico, como Leyenda, Área de trazado o Serie 1, para acceder a las propiedades y métodos de ese objeto. Por ejemplo, Charts("Chart1").Evaluate("Legend").Font.Name devuelve el nombre de la fuente usada en la leyenda.
Número de control de formulario. Puede especificar un número, así como un nombre, para hacer referencia al Control de formulario en una hoja de cálculo. Por ejemplo, para Etiqueta ubicada en una hoja de cálculo (pestaña Desarrollador - Insertar - Controles de formulario - Etiqueta), ambas Evaluate("Label 1").Caption = "Hello" y Evaluate("1").Caption = "Hello" hacer lo mismo.

El uso de corchetes (por ejemplo, "[A1:C5]") equivale a llamar al método Evaluate con un argumento de cadena. Por ejemplo, los siguientes pares de expresiones son 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")

Usar corchetes tiene la ventaja de que el código es más corto. La ventaja de usar Evaluate es que el argumento es una cadena, lo que permite integrarla en el código o usar una variable de Visual Basic.

Ejemplo:

En este ejemplo se activa el formato de negrita en la celda A1 de Sheet1.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.

Compartir vía