SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => VBA => Mensaje iniciado por: juvenal en Domingo 8 de Septiembre de 2002, 06:14

Título: Re: ¿Por qué Excel agrega decimales a mis valores truncados
Publicado por: juvenal en Domingo 8 de Septiembre de 2002, 06:14

En mi programa de VB obtengo valores truncados con sólo un decimal.
El programa los almacena en un archivo Excel, pero Excel le agrega más decimales.
¿Cómo puedo hacer que los valores queden almacenados con sólo un decimal. tal como lo tengo en el programa VB?

Título: ¿Por qué Excel agrega decimales a mis valores truncados en V
Publicado por: SpeedCAD en Martes 17 de Diciembre de 2002, 16:06

Hola...

Es raro por que ami me agrega tal como lo quiero de la siguiente forma:

MyArea.Cells(a_fils, a_cols) = Format(Text1.Text, "0.0")

Lo que puedes hacer es anter ponerle decimal GENERAL a Excel asi:

MyArea.Cells(a_fils, a_cols).NumberFormat = General
MyArea.Cells(a_fils, a_cols) = Format(Text1.Text, "0.0")

Espero que te sirva...

Un saludo de SpeedCAD...:)
CHILE