nel codice del foglio, inserisci una sub tipo questa, che richiama la
sub faiQuesto() se il valore calcolato in D1 è 10, faiQuello() se il
valore in D1 diventa -10, nulla in tutti gli altri casi
--8<---------------cut here---------------start------------->8---
Private Sub Worksheet_Calculate()
If [D1] = 10 Then faiQuesto Else If [D1] = -10 Then faiQuello
End Sub
--8<---------------cut here---------------end--------------->8---
nb - è il nome della sub, Worksheet_Calculate, ad innescare l'evento