Come aggiungere 1 al valore di una cella facendo doppio clic in Excel?

In questo articolo verrà illustrato un metodo per aggiungere automaticamente 1 al valore di una cella facendo doppio clic su di essa in Excel.

Utilizzare il doppio clic per aumentare il valore della cella di 1 con il codice VBA

Utilizzare il doppio clic per aumentare il valore della cella di 1 con il codice VBA

Il seguente codice VBA ti guiderà attraverso i passaggi per aggiungere 1 al valore nella cella A1 facendo doppio clic. Segui queste istruzioni.

1. Fai clic con il pulsante destro del mouse sulla scheda del foglio in cui devi aggiungere 1 al valore nella cella A1 facendo doppio clic. Quindi fai clic su Visualizza codice dal menu di scelta rapida.

2. Nel spuntare Microsoft Visual Basic, Applications Edition finestra, copia e incolla il codice VBA sottostante nella finestra del codice.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    On Error Resume Next
    If Not Intersect(Target, Range("A1")) Is Nothing Then
      Range("A1").Value = Range("A1").Value + 1
      Cancel = True
    End If
End Sub

Note:: Nel codice, A1 è la cella in cui verrà aggiunto 1 ogni volta che fai doppio clic. Puoi regolarlo come preferisci.

3. premi il altro + Q tasti contemporaneamente per chiudere la finestra di Microsoft Visual Basic, Applications Edition.

Ora, facendo doppio clic sulla cella A1 verrà aggiunto 1 al valore esistente, come mostrato nello screenshot qui sotto.

Articoli correlati:

• Come aggiungere / inserire automaticamente la data / ora corrente in una cella con doppio clic in Excel?
• Come aggiungere un segno di spunta in una cella con doppio clic in Excel?