Numeros despues del punto decimal

Respuesta de
a
Usuario
Hola, mi pregunta es acerca de como puedo hacer para que un numero ejem:(1250.1165), se lo asigne a una variable pero con solamente dos cifras después del punto decimal sin redondear el numero. Lo que pasa es que ya le intente y con todo me redondea el numero que te puse como ejemplo(1250.12), y es así como me lo deja, mi variable a la que se lo asigno la declare de tipo Currency.
A lo que voy es que quiero que mi numero sea: (1250.11).

Te agradeceré mucho esta ayuda lo más pronto posible.

Gracias...
Experto
Hola,
te paso una función para hacer eso.

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.

Cualquier duda estoy a tu disposición.
Saludos, Leo
Usuario
Muchas Gracias de verdad te lo agradezco