se a checkbox l'hai inserita dalla barra "strumenti di controllo" allora prova con tasto destro--> modifica codice
codice:
If CheckBox1.Value = True Then
    Range("???").Select
    ActiveCell.Value = ???
Else
    Range("???").Select
    ActiveCell.Value = ???
End If
altrimenti se lo hai inserito dalla barra "moduli" fai doppio clic--> controllo--> "collegamento cella", da qui selezioni una cella (es A19) nella quale verrà scritto in automatico vero/falso a seconda se la checkbox è selezionata o meno, a questo punto nella cella di destinazione metti una formula
=SE(A19;...+ ???;... - ???)