Incremento una cella in Microsoft Excel cliccando su di esso può essere facilmente realizzato utilizzando un evento di lavoro. L'evento SheetSelectionChange si verifica quando la selezione cambia su ogni foglio di lavoro. È possibile aggiungere il codice VBA all'interno di questo evento per incrementare il valore di una cella particolare. Questo processo è utile se si vuole risparmiare all'utente il tempo per non dover incrementare manualmente un valore quando si utilizza l'applicazione di Excel.

istruzione

1 Avviare Microsoft Excel, fare clic sulla scheda "Sviluppatore" e fare clic su "Visual Basic" per avviare la finestra di VBA Editor.

2 Fare doppio clic su "ThisWorkbook" dal riquadro Object Explorer per aprire un nuovo modulo. Aggiungere il seguente codice per incrementare cella A1 per uno quando l'utente fa clic su di esso:

Private Sub Workbook_SheetSelectionChange (ByVal Sh come oggetto, ByVal Target As Range)

If Target.Row = 1 And Target.Column = 1 Then

Range ( "A1"). Value = Range ( "A1"). Value + 1

Finisci se

End Sub

3 Tornare a Microsoft Excel e fare clic su A1 ad incrementarlo per uno.