Codigo para sustituir un valor
Publicado por Salvador (94 intervenciones) el 17/05/2016 11:14:41
Tengo un control calculado y me gustaría que cuando el resultado sea "100" se mostrara "0"
El valor del control es" =100-(miDivision([sumapreco];[materiales])*100)"
Siendo miDivision una funcion que es:
Cuando no hay [materiales] el resultado me da "100" y quisiera que fuera "0"
Gracias de antemano por vuestra ayuda
Salva
El valor del control es" =100-(miDivision([sumapreco];[materiales])*100)"
Siendo miDivision una funcion que es:
1
2
3
4
5
6
7
8
Public Function miDivision(dividendo As Variant, divisor As Variant) As Double
If IsNull(dividendo) Then dividendo = 0
If divisor = 0 Or IsNull(divisor) Then
miDivision = 0
Else
miDivision = dividendo / divisor
End If
End Function
Gracias de antemano por vuestra ayuda
Salva
Valora esta pregunta


0