Come aumentare un numero automaticamente quando viene aperto il workbook?

Se desideri aumentare una cella numerica di 1 automaticamente ogni volta che apri il workbook, ovviamente puoi aggiungere 1 manualmente. Ma esiste un metodo migliore per aggiungere 1 al numero automaticamente all'apertura del documento Excel?

Aumentare un numero automaticamente quando il workbook viene aperto con il codice VBA

Aumentare un numero automaticamente quando il workbook viene aperto con il codice VBA

Il seguente semplice codice VBA può aiutarti ad aggiungere 1 alla cella numerica automaticamente ogni volta che il workbook viene aperto. Procedi come segue:

1. Tieni premuti i tasti ALT + F11 e si aprirà la finestra Microsoft Visual Basic for Applications.

2. Nel riquadro Project-VBAProject, fai doppio clic su ThisWorkbook per aprire il Modulo, quindi copia e incolla il codice sottostante nel modulo, vedi screenshot:

Codice VBA: Aumenta un numero automaticamente quando il workbook viene aperto:

Private Sub Workbook_Open()
Worksheets("Sheet1").Range("A2") = Worksheets("Sheet1").Range("A2") + 1
End Sub

Nota: Nel codice sopra, Sheet1 e A2 sono il foglio e la cella che contengono il numero che desideri aumentare automaticamente. Cambiali in base alle tue esigenze.

3. Successivamente, dovresti salvare il file Excel in formato Cartella di lavoro con Macro Abilitate, vedi screenshot:

Da ora in poi, quando apri questa specifica cartella di lavoro, il numero nella cella A2 in Sheet1 verrà aumentato automaticamente di 1.

Nota: Questo codice è applicabile solo alla cella numerica.