Como le pongo el formato de un control en un informe para que me de tres
decimales si la cantidad es menor de 15, o dos decimales para cantidad mayor
de 15???
RESPONDE EDUARDO OLAZ
=====================
Puedes usar una función definida por tí
Algo así como esto
_____________________________________
Public Function FormatoDecimalesCondicional( _
valor As Double, _
Optional ByVal Decimales1 As Integer = 2, _
Optional ByVal Pivote As Double = 15, _
Optional ByVal Decimales2 As Integer = 3)
' Esta permite configurar el Nº de decimales
' Decimnales1 para un valor <= Pivote
' Decimales2 para un valor > Pivote
' Estos tres parámetros son opcionales
' tomando por defecto 2, 15 y 3
Dim strFormato As String
Dim intDecimales As Integer
If Decimales1 < 0 Then Decimales1 = 0
If Decimales2 < 0 Then Decimales2 = 0
Select Case valor
Case Is > Pivote
intDecimales = Decimales1
Case Else
intDecimales = Decimales2
End Select
If intDecimales = 0 Then
strFormato = "#,##0"
Else
strFormato = "#,##0." & String(intDecimales, 48)
End If
FormatoDecimalesCondicional = Format(valor, strFormato)
End Function
_____________________________________
RESPONDE QUE PACHA
==================
=format(campo;iif(campo<15;"#.###";"#.##"))
               (
geocities.com/es/ensolva/Descargas)                   (
geocities.com/es/ensolva)                   (
geocities.com/es)