TextBox y label con formato de %

Hola de nuevo

Pues lo he revisado y sigo sinhacerlo bien

el código está así:

Private Sub TextBoxDcto_Change()
uds = Val(TextBoxUds)
precio = Val(TextBoxPrecio)
dcto = Val(TextBoxDcto)
If precio = pprecio + pmont + ptransp Then
impte = uds * (precio * (1 - Val(dcto)) + pmont + ptransp)
Else
impte = uds * precio * (1 - Val(dcto) / 100)
End If
LabelImpteF.Caption = impte
End Sub

Private Sub TextBoxDcto_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBoxDcto.Text = Format(TextBoxDcto.Text, "0.00%")
End Sub


Al agregar inspección, he visto que al llegar a:

dcto = Val(TextBoxDcto)

trunca el valor a paratir de la coma (en mi sistema la unidad decimal es
la coma)

No sé qué más hacer. Gracias de nuevo

Javi


KL escribió:

1) Si usas el codigo tal como te lo puse deberia hacerlo todo correctamente.
Luego si necesitas usar el valor en algun calculo podrias hacerlo por medio
de Val(TextBox1).

2) Es posible q el problema radique en q tu sistema usa el punto como
separador de decimales y no coma.

dime algo.

KL

"Javi" wrote in message
news:

Hola KL

Pues quiero utilizar decimales por ejemplo para calcular el 25,5%.

Si introduzco 25,5% en un textbox con la ¿funcion? Val() me devuelve el
valor y me deja hacer cálculos, pero sólo con la parte entera, es decir,
calcula el 25% parece que trunca la parte decimal

Lo he intentado con y sin formato de % y no sale de ninguna manera

Gracias de nuevo

Javi

KL escribió:

Hola Javi,

funciona bastante bien, excepto con los decimales. * ¿Se puede hacer que
trabaje también con decimales? (como un porcentaje normal)

Puedes explicar un poco mas no acabo de entender cual es el problema

* ¿Hay algún control de herramientas que sirva especificamente para
trabajar con números?

Hasta donde se, no hay controles de formulario destinados exclusivamente
para valores numericos ni para texto, o sea todos pueden utilizarse tanto
con numeros como con texto.

Saludos,
KL

trunca el valor a paratir de la coma (en mi sistema la unidad decimal es
la coma)

Pues prueba cambiar
Format(TextBoxDcto.Text, "0.00%")
por
Format(TextBoxDcto.Text, "0,00%")

A ver que tal.

KL

Mejor usa CSng() en lugar de Val(). La funcion Val no tiene en cuenta la
configuracion regional del usuario.

"Javi" escribió en el mensaje
news:

Hola KL

Pues quiero utilizar decimales por ejemplo para calcular el 25,5%.

Si introduzco 25,5% en un textbox con la ¿funcion? Val() me devuelve el
valor y me deja hacer cálculos, pero sólo con la parte entera, es decir,
calcula el 25% parece que trunca la parte decimal

Lo he intentado con y sin formato de % y no sale de ninguna manera

Gracias de nuevo

Javi

KL escribió:
> Hola Javi,
>
>
>>funciona bastante bien, excepto con los decimales. * ¿Se puede hacer que
>>trabaje también con decimales? (como un porcentaje normal)
>
>
> Puedes explicar un poco mas no acabo de entender cual es el problema
>
>
>>* ¿Hay algún control de herramientas que sirva especificamente para
>>trabajar con números?
>
>
> Hasta donde se, no hay controles de formulario destinados exclusivamente
> para valores numericos ni para texto, o sea todos pueden utilizarse

tanto

> con numeros como con texto.
>
> Saludos,
> KL
>
>

Me corrijo CSng no entiende el simbolo de %, entonces no te sirve
directamente

"Manuel Romero" @hotmail.com> escribió en el mensaje
news:%23d%

Mejor usa CSng() en lugar de Val(). La funcion Val no tiene en cuenta la
configuracion regional del usuario.

"Javi" escribió en el mensaje
news:
> Hola KL
>
> Pues quiero utilizar decimales por ejemplo para calcular el 25,5%.
>
> Si introduzco 25,5% en un textbox con la ¿funcion? Val() me devuelve el
> valor y me deja hacer cálculos, pero sólo con la parte entera, es decir,
> calcula el 25% parece que trunca la parte decimal
>
> Lo he intentado con y sin formato de % y no sale de ninguna manera
>
> Gracias de nuevo
>
> Javi
>
> KL escribió:
> > Hola Javi,
> >
> >
> >>funciona bastante bien, excepto con los decimales. * ¿Se puede hacer

que

> >>trabaje también con decimales? (como un porcentaje normal)
> >
> >
> > Puedes explicar un poco mas no acabo de entender cual es el problema
> >
> >
> >>* ¿Hay algún control de herramientas que sirva especificamente para
> >>trabajar con números?
> >
> >
> > Hasta donde se, no hay controles de formulario destinados

exclusivamente

> > para valores numericos ni para texto, o sea todos pueden utilizarse
tanto
> > con numeros como con texto.
> >
> > Saludos,
> > KL
> >
> >

Hola Manuel

Gracias por tu ayuda

Había intentado hacerlo con esa función y no va mal, pero al final lo he
simplificado y le he quitado el signo

Un saludo

JAvi

Manuel Romero escribió:

Me corrijo CSng no entiende el simbolo de %, entonces no te sirve
directamente

"Manuel Romero" @hotmail.com> escribió en el mensaje
news:%23d%

Mejor usa CSng() en lugar de Val(). La funcion Val no tiene en cuenta la
configuracion regional del usuario.

"Javi" escribió en el mensaje
news:

Hola KL

Pues quiero utilizar decimales por ejemplo para calcular el 25,5%.

Si introduzco 25,5% en un textbox con la ¿funcion? Val() me devuelve el
valor y me deja hacer cálculos, pero sólo con la parte entera, es decir,
calcula el 25% parece que trunca la parte decimal

Lo he intentado con y sin formato de % y no sale de ninguna manera

Gracias de nuevo

Javi

KL escribió:

Hola Javi,

funciona bastante bien, excepto con los decimales. * ¿Se puede hacer

que

trabaje también con decimales? (como un porcentaje normal)

Puedes explicar un poco mas no acabo de entender cual es el problema

* ¿Hay algún control de herramientas que sirva especificamente para
trabajar con números?

Hasta donde se, no hay controles de formulario destinados

exclusivamente

para valores numericos ni para texto, o sea todos pueden utilizarse

tanto

con numeros como con texto.

Saludos,
KL