funcion personalizada

¡Importante!: Colabora con el grupo. Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias
Hola!

sin saber que y como hace esa función, cualquier respuesta acertada será
mera casualidad, Mi apuesta, tienes una variable dimensionada como integer y
por ello no le caben números mayores, si así fuera cámbiala a long.


Saludos a todos
Emilio [MS-MVP Access 2006/11]
miliuco56 ALGARROBA hotmail.com
http://www.mvp-access.com/foro
http://www.mvp-access.es/emilio

"frankye" escribió en el mensaje de
noticias:

¡ Hola !
Intento sumar celdas que tengan un valor comprendido entre A y B
(concretamente
códigos postales ej: 39000 y 39999) pero la función que
encontré resulta que me lo hace hasta unos valores concretos no sé
porque a partir del 35000 me da #¡NUM!

Puedes aplicar la siguiente función, suponiendo que los números se encuentran en el rango A2:A50, entonces la función queda de la siguiente manera.

=SUMAR.SI.CONJUNTO(A2:A50,A2:A50,">9000",A2:A50,"<9999")

Ahora, el error de "¡NUM! quieres decir que algunos datos no son números. Para corregir esto aplica a las celdas la siguiente función =VALOR(Rango de datos) y luego con pegado especial pégalos como solo valor sobre los datos originales

Espero haberte ayudado.

www.CapacitateExcel.com

Emilio escribió el 14/06/2015 06:09 :

¡Importante!: Colabora con el grupo. Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias
Hola!

sin saber que y como hace esa función, cualquier respuesta acertada
será
mera casualidad, Mi apuesta, tienes una variable dimensionada como integer y
por ello no le caben números mayores, si así fuera
cámbiala a long.


Saludos a todos
Emilio [MS-MVP Access 2006/11]
miliuco56 ALGARROBA hotmail.com
http://www.mvp-access.com/foro
http://www.mvp-access.es/emilio

"frankye" escribió en el mensaje de
noticias:

¡ Hola !
Intento sumar celdas que tengan un valor comprendido entre A y B
(concretamente
códigos postales ej: 39000 y 39999) pero la función que
encontré resulta que me lo hace hasta unos valores concretos no
sé
porque a partir del 35000 me da #¡NUM!

Acertaste la apuesta cambiando INTEGER por LONG Problema solucionado
la función original era:
Function Ocurrencesbetween(myrange As Range, lowestnumber As Integer, highestnumber As Integer) As Integer
Dim counter As Integer
counter = 0
For Each Cell In myrange
If Cell.Value >= lowestnumber And Cell.Value < highestnumber Then
counter = counter + 1
End If
Next Cell
Ocurrencesbetween = counter
End Function
GRACIAS!