Access - %descuento y % utilidad en cotizaciones

Buenas noches,

Agradezco la ayuda , si es posible a la siguiente inquietud.


tengo un valor unitario campo moneda =100 cop
campo numerico % descuentos = 2%
campo numerico % utilidad =0
campo valor neto = ?
se requiere hacer la operacion para obtener el valor neto es = [valor unitario]-([valor unitario * % descuento]), pero si el descuento es =0 el valor neto sera = valor uitario,

ahora si no encuentra nada en descuento , pero si en utilidad el valor neto =[valor unitario]-([valor unitario * % utilidad]) pero si el utilidad es =0 el valor neto sera = valor Unitario

espero a su ayuda con esta inquietud de como realizar la operacion con generador de codigo VBA

Gracias

Hola, soy programador experto en Access y VBA he desarrollado aplicaciones y bases de datos desde hace más de 10 años.

Tu redacción es un poco confusa ya que en una parte comentas que si es cero el descuento se debe de poner el valor sera el unitario y por otro lado dices que si no hay nada en descuento. ¿Nada no es igual que cero cuando se esta hablando de números? De todos modos te puse el código que creo que te podría funcionar o por lo menos orientar.


Nota: Algunas de las aplicaciones que he desarrollado han sido:

Punto de venta.
Inventarios.
Control Documental.
Sistemas Contables.
Control de Consultorio Médico.
Recetario.
Control de gastos de Obra Civil.
Control de Radio Taxis.
Control de Redes Avon.
Control de producción y fabricación.
Etc.

Pueden contactarme a los teléfonos Cel. +55 (55) 62169107, 73148182
[email protected]; Web: http://accesssolutions-webnode.com.mx/

Servicios de consultoria y desarrollo a la medida.

Esto:
...
se requiere hacer la operacion para obtener el valor neto es = [valor unitario]-([valor unitario * % descuento]), pero si el descuento es =0 el valor neto sera = valor uitario,
...

Se puede resolver asi:
= [valor unitario] * (1 - ([descuento] /100))

si descuento=3 y valor unitario = 100

= 100 *(1-(3/100))
= 100 *(1 - .03)
= 100 *(.97)
= 97

si descuento=0 y valor unitario = 100
= 100 *(1-(0/100))
= 100 *(1-(0))
= 100 *(1)
= 100


Puedes aplicar esa misma logica para el otro calculo e incluso utilizar la funcion IIF si fuera necesario (IIF es una funcion que permite utilizar 'fuera de VBA' la logica de IF --- Then --- Else)