** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Redondear cifra a 0 o 5
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoRedondear cifra a 0 o 5

 Responder Responder Página  12>
Autor
Mensaje
Pp2010 Ver desplegable
Asiduo
Asiduo


Unido: 20/Mayo/2010
Localización: Estados Unidos
Estado: Sin conexión
Puntos: 237
Enlace directo a este mensaje Tema: Redondear cifra a 0 o 5
    Enviado: 23/Enero/2018 a las 16:16
Estimado amigos, necesito ayuda con lo siguiente:
Tengo el resultado de un campo calculado en un formulario, los valores resultantes pueden ser con decimales o no y lo qu enecesito es "redondear" el ultimo valor entero a 0 o 5 ejemplo:
12.3---15
27.8---30
47-----50

He utilizado la funcion =Round ([Valor],0), pero lo que necesito es redondear el valor entero, he buscado en la web, el grupo y en mi cabeza y no se como hacerlo.
Alguien conoce de alguna funcion que haga algo parecido.

Gracias por todas las ayudas recibidas y que tengan un bonito 2018
Arriba
RRoca Ver desplegable
Colaborador
Colaborador


Unido: 02/Enero/2006
Localización: España
Estado: Sin conexión
Puntos: 4821
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 17:01
Hola:
Si te entendido bien necesitarías redondear los decimales u luego según esto que hay en Yotube.
https://www.youtube.com/watch?v=8D5TcC85Bao
Saludos.
Romain Rolland (1866-1944) escritor y ensayista frances dijo: Crear, es matar la muerte. (para mi, filosoficamente penetrante)
Arriba
ximo Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 03/Marzo/2006
Localización: España
Estado: Sin conexión
Puntos: 2020
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 18:11
Hola,

Pues lo que pretendes según san google se hace con Round(campo,-2), por lo menos en excel, en acces no lo he probado.


Saludos, ximo
La incansable busqueda de información abre nuestras mentes

Saludos desde Burriana
Arriba
emiliove Ver desplegable
Moderador
Moderador


Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 5287
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 18:37
Y que dificultad hay en hacer una función, que haga exactamente eso.
No necesitas gran cosa solo usar un par de función como Int para sacar el entero y Rigth para sacar el último digito entero y con eso puedes crear tu función sin batallar, inténtalo y si te atoras te ayudo.

Saludos.
Arriba
MexMan70 Ver desplegable
Colaborador
Colaborador


Unido: 17/Julio/2007
Localización: DarkSide
Estado: Sin conexión
Puntos: 9235
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 19:01
Puedes aplicar un modelo matemático tan simple como:

INT(UnNúmero) + (5 - INT(UnNúmero) MOD 5)

Saludos !
OneDrive: http://sdrv.ms/Vk6eJd
Arriba
ximo Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 03/Marzo/2006
Localización: España
Estado: Sin conexión
Puntos: 2020
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 19:33
Hola,

Roberto Clap


Saludos, ximo
La incansable busqueda de información abre nuestras mentes

Saludos desde Burriana
Arriba
rokoko Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 16/Febrero/2008
Localización: Pamplona
Estado: Sin conexión
Puntos: 2713
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 19:38
Publicado originalmente por MexMan70 MexMan70 escribió:

Puedes aplicar un modelo matemático tan simple como:

INT(UnNúmero) + (5 - INT(UnNúmero) MOD 5)

Saludos !

Interesante siempre se aprende algo.....hace justo lo que pide el Pp2010Clap
Arriba
prga Ver desplegable
Moderador
Moderador


Unido: 16/Noviembre/2004
Localización: España
Estado: Sin conexión
Puntos: 3381
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 19:44
Hola.
Sin ánimo de ser agorero, pero al aplicarlo, por ejemplo, al número 40, al menos a mí me da 45 y parece ser que tenía que dar el propio 40
Un saludo a todos

Arriba
mounir Ver desplegable
Colaborador
Colaborador


Unido: 09/Febrero/2009
Localización: Asturias-España
Estado: en línea
Puntos: 5925
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 19:54
Hola!

Prueba con esta formula:

=-5*Int([Texto0]/-5)
Un Saludo.
Arriba
Pp2010 Ver desplegable
Asiduo
Asiduo


Unido: 20/Mayo/2010
Localización: Estados Unidos
Estado: Sin conexión
Puntos: 237
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 20:06
Muchas gracias a todos por sus aportes, el camino que utilice fue la sugerencia de mexMan70, me funciona muy bien hasta ahora.

Para ser honesto no logro entender bien que hace la segunda parte (5 - INT(UnNumero)MOD 5), revice la funcion MOD y me falta matematicas para comprenderlo, lo mas importante es que funciona y muchas gracias.
pueden cerrar el hilo
Arriba
MexMan70 Ver desplegable
Colaborador
Colaborador


Unido: 17/Julio/2007
Localización: DarkSide
Estado: Sin conexión
Puntos: 9235
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 20:13
Llevas toda la razón prga, lo he probado con números enteros y al llegar a los múltiplos solicitados se produce lo que has descubierto.

No probé dicho modelo y se puede solucionar indagando el residuo para no adicionarle el múltiplo solicitado.

Aquí la corrección:

Int(UnNúmero) + IIf(INT(UnNúmero) Mod 5 > 0,5 - Int(UnNúmero) Mod 5,0)

Pdata: Esta escrita al vuelo... 
OneDrive: http://sdrv.ms/Vk6eJd
Arriba
prga Ver desplegable
Moderador
Moderador


Unido: 16/Noviembre/2004
Localización: España
Estado: Sin conexión
Puntos: 3381
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 20:44
No quiero ser gafe, pero ahora con 40.1 me da 40 y tendría que ser 45.

Arriba
MexMan70 Ver desplegable
Colaborador
Colaborador


Unido: 17/Julio/2007
Localización: DarkSide
Estado: Sin conexión
Puntos: 9235
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 21:43
Muy al contrario prga, agradezco tus pruebas y de hecho la labor que estas haciendo debería hacerla Pp2010 y se ha conformado con lo ofrecido sin haber testeado con más datos. 

En un rato más hago una serie completa con un grupo más amplio y reviso a fondo...

Saludos !
OneDrive: http://sdrv.ms/Vk6eJd
Arriba
Pp2010 Ver desplegable
Asiduo
Asiduo


Unido: 20/Mayo/2010
Localización: Estados Unidos
Estado: Sin conexión
Puntos: 237
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 22:22
Por favor no cerrar el hilo, he estado haciendo algunas pruebas y no me percate del valor entero con 0 al final, agradezco el esfuerzo que hacen para que se logre lo mas depurado posible, a mi me faltan conocimientos y lo mejor que hago es aprender.
Compare la sugerencia de Mounir y en mi serie da los mismos valores que la anterior, relamente son series pequeñas en campos calculados, quizas por eso no me es evidente.
Arriba
lbauluz Ver desplegable
Administrador
Administrador
Avatar

Unido: 29/Marzo/2005
Localización: Binghamton Jail
Estado: Sin conexión
Puntos: 3595
Enlace directo a este mensaje Enviado: 23/Enero/2018 a las 23:39
Pues yo juraría que la fórmula que ha puesto Mounir funciona.

=-5*Int([Texto0]/-5)

Lo he probado en Excel desde 1,00, 1,01, 1,02 .... hasta 159,99 y yo lo veo bien en todos los casos.


Eso si, recomiendo valorar si con números negativos lo que sale es lo que se espera.

Luis
Hay un culto a la ignorancia y siempre lo ha habido y es alimentado por la falsa noción de que democracia significa que "mi ignorancia es tan buena como su conocimiento". (Isaac Asimov)
Arriba
 Responder Responder Página  12>
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable