la función que las modifica es esta
'' ## Descripcion ##
''
'' Funcion para formatear texto en notacion
''
'' ## Parametros ##
''
'' - sText As String: Texto a formatear
''
'' - sTipo As String: Constante String de la clase estatica Formats o cualquier tipo de abreviatura que
'' quiera agregarle al numero.
''
'' ## Retorno ##
''
'' - As String: Cadena formateada
''
'' ## Error ##
''
'' Si la cadena no representa un numero no puede formatearse
'' y se retorna un error
''
'' Const _Err As String = "#ERROR#"
''
'' ## Comentario ##
''
'' Revertir esto me va hacer doler la cabeza....
Public Function FormatMedidas(sText As String, sTipo As String) As String
Dim sResultado As String
sResultado = Format(sText, "-,0.00 " & sTipo)
Return sResultado
Catch
Return MMain._Err
End
La solución era como les comente sustraer la cadena dada pero para eso debo verificar cual de las constantes se le aplico lo cual no seria un problema la cuestión es la cantidad de lineas que se devén escribir, si existe o existiese alguna forma de enumerar las constantes existentes en una clase podria hacerlo con un bucle... o alguna otra solución? soy todo ojos....