Ciao a tutti! 
Spero che il probl che vi propongo non sia troppo troppo banale... sto cercando di associare la checkbox garanzia ad un costo di prodotto in modo tale che se attivata, il costo si annulla. Quando riseleziono la checkbox vorrei che il costo tornasse al valore originale immesso.
In breve:
costo = 12 se garanzia non selezionata
costo = 0 se garanzia attivata
Il codice che ho provato ad implementare è questo qui
Private Sub garanzia_AfterUpdate()
Dim CostoRic
CostoRic = Me!costo
If (garanzia.Value = True) Then
costo= 0
ElseIf (garanzia.Value = False) Then
costo= CostoRic
End If
End Sub
Quando l'abilito mi azzera il costo, ma quando la spunto nuovamente mi mantiene il costo azzerato... e non so che pesci pigliare.:hammer:
Ringrazio tutti anticipatamente per l'attenzione!
Good work

Spero che il probl che vi propongo non sia troppo troppo banale... sto cercando di associare la checkbox garanzia ad un costo di prodotto in modo tale che se attivata, il costo si annulla. Quando riseleziono la checkbox vorrei che il costo tornasse al valore originale immesso.
In breve:
costo = 12 se garanzia non selezionata
costo = 0 se garanzia attivata
Il codice che ho provato ad implementare è questo qui
Private Sub garanzia_AfterUpdate()
Dim CostoRic
CostoRic = Me!costo
If (garanzia.Value = True) Then
costo= 0
ElseIf (garanzia.Value = False) Then
costo= CostoRic
End If
End Sub
Quando l'abilito mi azzera il costo, ma quando la spunto nuovamente mi mantiene il costo azzerato... e non so che pesci pigliare.:hammer:
Ringrazio tutti anticipatamente per l'attenzione!
Good work