Paso de argumentos en funciones

[rguez]

Hola otra vez

Sigo en lo de las funciones, les expongo el siguiente
caso

function misuma(rango as range) as double
misuma=rango+range("a1")
end function

Al utilizar esto en una planilla, deberìa sumar el valor
de la celda A1 a la celda referida.
Funciona bien, pero si luego cambias lo que hay en A1
la funcion no se actualiza.
He intentado con .evaluate y .calculate
pero no funciona

Lo ùnico que funciona es application.calculatefull
pero -como entenderàn- es muy intensiva pues
recalcula todos los libros abiertos en el instante.

Entiendo que lo razonable serìa construir una
funciòn que pase como argumento ambas celdas,
pero mi idea es tomar muchas celdas de distintos
lugares en un solo calculo y serìa muy engorroso hacer
pasar como referencia todas en la funciòn.

Gracias!

 

[Juan Pablo González]

Es que el problema es que para Excel, la función que contiene esa fórmula no es dependiente de A1, y por lo tanto no la marca como "sucia" (Que necesita recalcular...)... así que la opción que veo es marcarla como volátil, que tiene un gran impacto, ya que se recalcularía cada vez que cualquier celda cambie...

Esto se hace poniendo

Application.Volatile True

al principio de la función.

NO ES RECOMENDABLE si se va a utilizar la función en muchas celdas... definitivamente, lo mejor sería utilizar un parámetro para cada celda, pero pues si es muy engorroso...