Sacar los primeros dos decimales de un número (sin redondear)

Pega este código:
Function NoRedondear(Numero As String) As String
Dim Punto As Boolean
Dim Pasos As Single
For asd = 1 To Len(Numero)
If Punto = True Then Pasos = Pasos + 1
If Mid(Numero, asd, 1) = "." Then Punto = True
Next
If Pasos > 2 Then NoRedondear = Left(Numero, Len(Numero) - (Pasos - 2))
End Function
ahora lo usas asi:
numero= "1250.1165"
numero = val(NoRedondear(str(numero)))
Fíjate que le entregas un String con tu numero (1250.1165) y te devuelve un Strig con el resultado (1250.11), no importa la cantidad de decimales que le entregues, siempre te da solo los primeros 2 sin redondear.

• Tweetear
• Compartir
• Compartir
• Compartir
• Compartir

Acerca de: Googlear MX

ACLARAMOS que algunos textos, imagénes o videos publicados en este sitio NO son de nuestra propiedad. Si usted, que lee esto, tiene derechos de autor sobre alguno de los materiales publicados en nuestro sitio y desea que adjuntemos los créditos respectivos o que se retire el material, no dude en contactarse co n nosotros.

Entradas relacionadas