Función si la pueda insertar en una macro

Pues la función si() en macro se maneja algo así:
a = 4+1
if a = 5 then
b = "Cumple Condicion"
else
c = "No Cumple Condicion"
End If

Le doy las gracias si me sirvió, pero para hacer en un rango como le puedo hacer
Saludos y de nuevo mil gracias

No entiendo lo que necesitas, siempre trata de poner un ejemplo, porque a veces tenemos diferentes denominaciones de las mismas cosas. ¿Qué quieres que se valide en el rango?

Buen día:
El ejemplo que voy a desorrollar
a1 tiene un valor en entonces me multiplique a1 por a2 en a3 si no que no me de nada
como la funcion si(a1<>"",a1 x a2,"") en a3
nose si me explico, de antemano gracias