Imprimir página | Cerrar ventana

Formato número

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=84504
Fecha de impresión: 26/Marzo/2026 a las 15:29


Tema: Formato número
Publicado por: Nomada
Asunto: Formato número
Fecha de publicación: 21/Mayo/2019 a las 11:50
Buenas.
Tengo un formulario con un campo numérico y dos decimales (CampoAAA), además claro está de otros campos. Con el código de CartasWord de Neckkito creo en Word mi carta. Hasta aquí todo perfecto.
Pero si el campo numérico tiene como valor 372,10, en el documento de Word me aparece 372,1. No me muestra los 2 decimales cuando termina en cero.
En el código donde se rellenan los marcadores de Word he escrito el código:

.Item("WImporte").Range.Text = Format(CampoAAA, "#.##0,##")

Aquí el resultado es 372,1000
Si le quito los decimales en el formato el resultado es 372,1 y yo quiero que muestre 372,10

Alguna sugerencia?

Gracias y un saludo.




Respuestas:
Publicado por: mounir
Fecha de publicación: 21/Mayo/2019 a las 12:23
Hola!

Prueba así:


Item("WImporte").Range.Text = Format(CampoAAA, "#.##0,#0") o así

Item("WImporte").Range.Text = Format(CampoAAA, "#.##0,00")

de esta forma se convierte en Estándar.

-------------
Un Saludo.


Publicado por: VIMIPAS
Fecha de publicación: 21/Mayo/2019 a las 12:26
Buenos días.

Acabo de crear una tabla para tratar de emular tu ejemplo y estos son los registros que he creado:

PARAnomada
WImporte
1.235,60
1.125,98
623,15
23.565,33
372,10
372,60
372,55
372,90

De entrada debo añadir que el campo que he creado (WImporte) es numérico, en Tamaño de campo he puesto que sea Doble, en Formato he puesto que sea Estándar y en Lugares decimales he puesto que sea 2.

La primera pregunta es: ¿tu lo tienes igual?
La segunda pregunta es: ¿O solo ocurre cuando lo traspasas a Word? (yo no lo he traspaso a Word, de momento no sé y no me interesa aprender, por ahora).

Ya me dirás.

Saludos.


-------------
Gracias


Publicado por: Nomada
Fecha de publicación: 21/Mayo/2019 a las 14:21
Gracias Vimipas.
He probado con los siguientes formatos y el resultado es:
Formato #.##0,#0 = 372,10000
Formato #.##0,00 = 372,10000
Formato #.##0,## = 372,100
Formato #.###,## = 372,1

En el formulario aparece bien, pero al pasarlo a Word no muestra el dato bien. Sin embargo si la cantidad fuera 372,35 si lo muestra bien.


Publicado por: lbauluz
Fecha de publicación: 21/Mayo/2019 a las 15:21
Muy buenas Nomada:

Cambia los puntos por comas y las comas por puntos y prueba

me temo que el VBA esta en guiri :) (como mi teclado y por eso no tengo acentos)

Luis


-------------
El Búho es un pajarraco


Publicado por: VIMIPAS
Fecha de publicación: 21/Mayo/2019 a las 15:23
Hola de nuevo.

Al margen de la prueba que te indica Luis.... 

Tu hablas de Formatos que pones, yo he hablado de que en la tabla he puesto tal y cual.... pero en la tabla, en ningún otro sitio. De ahí las dos preguntas que he hecho y que no has contestado a ninguna, por ello, reitero mis dos preguntas.

Saludos.


-------------
Gracias


Publicado por: Nomada
Fecha de publicación: 21/Mayo/2019 a las 19:37
A la primera pregunta: si tengo todas las características igual, sí las tengo igual en la tabla. Y la segunda solo ocurre cuando lo paso a Word


Publicado por: fcoval
Fecha de publicación: 21/Mayo/2019 a las 20:35
A mi se me ocurre que si en Access logras tener ese valor con dos decimales y lo que quieres es pasarlo a Word, prueba a pasarle a Word dicho valor numérico pero antes convertido a String.


Usa la función CStr.

Cita
CStr(Format(CampoAAA, "#,##0.00"))


Publicado por: VIMIPAS
Fecha de publicación: 21/Mayo/2019 a las 22:26
Hola de nuevo.

El apunte de fcoval me parece perfecto pero con un pequeñísimo matiz que lo arreglaría todo:

Tengo en la tabla 372,10 pues muy bien, me vale, pero si lo paso a Word con  Cstr(WImporte)

¿Como quedaría en Word nomada?.

Puedes comprobarlo y nos dices.

Saludos.


-------------
Gracias


Publicado por: Nomada
Fecha de publicación: 24/Mayo/2019 a las 07:44
Perfecto fcoval, el dato en Word ha salido como estaba en el campo de Access 372,10.

Este hilo se puede cerrar satisfactoriamente.

Gracias a todos y un saludo.



Imprimir página | Cerrar ventana