Excel - Division por cero en calculo con rangos

   
Vista:

Division por cero en calculo con rangos

Publicado por Quinto (22 intervenciones) el 24/11/2010 11:09:51
Hola amigos,

otro error en el calculo con funciones similares a las anteriores.

Tengo esta funcion:

Function MyDiv(rng1 As Range, rng2 As Range) As Double
MyDiv = Evaluate("Average(" & rng1.Address & "/" & rng2.Address & ")")
End Function

si alguno de los valores de rgn2 es cero, por supuesto da error. Mi pregunta:

Existira alguna forma desde codigo VBA de ponerle una condicion para que solo realice el calculo con los valores sean <>0? Es decir que la funcion pueda realizar su operacion matematica sin tener que realizar el calculo verificando uno a uno?

mil gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder