Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Función WorksheetFunction.IsEven en VBA

| Sin comentarios

La función EsPar (IsEven)  nos permite evaluar los números de una celda si es par, en caso de que los números sean pares entrega en una celda asignada como “####” en caso contrario entrega como “falso”.

Para poder hacer uso de esa función se puede hacer poniendo en el editor de VBA lo siguiente:

Sub EsPar()
Numero = Worksheets("Hoja1").Range("C3").Value
Worksheets("Hoja1").Range("C5").Value = WorksheetFunction.IsEven(Numero)

End Sub

 

La celda a evaluar es la C3 la cual contiene el Numero evaluar que se encuentra en la Hoja1 (Worksheets) que contiene a la celda C3 (Range). En la misma hoja 1 se entrega el resultado evaluado en la celda C5. El ejemplo que se puede tener se encuentra en el archivo adjunto.

Descargar ejemplo de la función:  Función WorksheetFunction.IsEven en VBA

Deja un comentario

Los campos requeridos estan marcados con *.