Mi permetto di entrare in questa discussiione anche se tardivamente (le ferie mi hanno fatto assentare un po', per fortuna!!!).
Volevo solo aggiungere che, se un utente vuole incrementare manualmente o tramite un pulsante una cella qualsiasi (es. F20) basta la seguente semplicissima routine che abbinata ad un pulsante incrementa il valore della cella stessa ad ogni pressione del pulsante.
Sub incrementa()
Range("F20").Value = Range("F20").Value + 1
End Sub
Ciao
Riccardo
|