j'ai dans une cellule la formule : =SI(E8='';'';S8)
ensuite, dans un USF j'ai une checkbox a cocher, si cette check box est coché, je veut que ma formule devienne :
=SI(E8='';'';S8-1)
Je saisie ceci dans ma check box, mais ca ne marche pas :
Code:
Private Sub REPAS_Click()
If REPAS.Value = True Then
Range('G8').Value = '=SI(E8='';'';S8-1)'
Else
Range('G8').Value = '=SI(E8='';'';S8)'
End If
End Sub
Private Sub REPAS_Click()
If REPAS.Value = True Then
Range('G8').FormulaLocal = '=SI(E8='''';'''';S8-1)'
Else
Range('G8').FormulaLocal = '=SI(E8='''';'''';S8)'
End If