039. Scrivere serie da 1 a N con VBA

Download PDF

Domanda:

Come posso creare la colonna degli interi consecutivi a 1 a N dove N è un parametro variabile(un numero intero) che viene immesso dall\’utente (ad esempio nella casella G2)?

Risposta:

Il primo passo è definire il parametro N che può essere valorizzato o prendendo il valore a una cella di un foglio o attraverso un Inputbox.

Poi  bisogna verificare se il valore da considerare è un numero o se per errore è stato inserito una lettera o altro

Se N è valorizzato correttamente, allora si procede a cancellare valori precedentemente inseriti
e a scrivere la serie:

        Sheet1.Range(Cells(2, 1), Cells(Last_Row, 1)).ClearContents
        For i = 1 To N
            Sheet1.Cells(i + 1, 1) = i
        Next i

In allegato trovare la macro in due versioni, una che prende il valore di N dalla cella “G2”, l’altra che utilizza un InputBox.

A voi il file:
APRI

Riccardo Vincenti

The following two tabs change content below.