Visual Basic para Aplicaciones - Suma en textbox

Life is soft - evento anual de software empresarial
   
Vista:

Suma en textbox

Publicado por Albert (108 intervenciones) el 07/01/2009 18:16:02
estimados foreros, tengo un problema con el siguiente codigo:

Private Sub textbox85_Change()
Dim X As Integer
Dim a As Integer
Dim ultima As Integer
Dim Apagar As Double
Dim IGIC As Double

For X = 4 To 10000
If salidas.Cells(X, 1) = "" Then
ultima = X - 1
Exit For
End If
Next

For a = 4 To ultima
IGIC = (Val(TextBox85) * Val(TextBox83) / 100) 'aqui bien
TextBox82 = IGIC
Apagar = Val(TextBox85) + Val(TextBox82) 'aqui mal
TextBox86 = Apagar

TextBox82 = Format(TextBox82, "#,##0.00 €")
TextBox86 = Format(TextBox86, "#,##0.00 €")
Next

End Sub

Al operar con cifras con decimales siempre me redondea los resultados, vaya que si da 2.15 pone 2 pero solo en las sumas, he intentado sacar el "Val" pero entonces pone un valor al lado del otro.
alguien me puede decir que hago mal?
Mil gracias de antemano
Albert
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
Imágen de perfil de JuanC

RE:Suma en textbox

Publicado por JuanC (431 intervenciones) el 07/01/2009 21:30:55
la función Val te convierte el texto en número, pero se 'come' los signos (.)
podrías usar CDbl aunque tampoco es lo ideal... dependiendo del caso...

Saludos desde Baires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Suma en textbox

Publicado por Albert (108 intervenciones) el 08/01/2009 16:35:28
Gracias, como bien dices me funciona en un textbox con 2 sumandos pero no en otro que tiene exactamente el mismo codigo pero con 3 sumandos.
Seguire investigando
Repito gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Suma en textbox

Publicado por Rodolfo (1 intervención) el 05/04/2009 08:31:03
Hola,

...¿por qué no intentas aprovechar la relación que tiene VBA con Excel y en una hoja oculta dejas los datos por sumar, lo sumas desde la hoja de calculo y después lo recoges desde tu apicación?

Saludos desde Puebla, México. Rodolfo Mtz. Glz.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar