|
Login

Ricerca Tips

Trovare l'ultima riga disponibile
(3 VOTITALY_VOTES, VOTITALY_AVERAGE: 4.33 VOTITALY_OUTOF)
Tips and Tricks - VBA: libreria

In moltissime procedure è necessario fare delle azioni nell'ultima o fino all'ultima riga disponibile. Per conoscere questo valore, in VBA abbiamo diverse opzioni.

Una strada è usare salire dal basso fino in alto. Se usiamo una versione di Excel inferiore alla 2007 sappiamo che il nostro foglio non avrà mai più di 65.000 righe (altrimenti consideriamo 1 milione di righe), possiamo fare così:

UltimaRigaX = Sheets("Foglio1").Range("A65000").End(XlUp).Row

Questa procedura prende l'ultima riga usata dall'utente, anche se sono state lasciate delle righe vuote.

Se sappiamo che l'utente non può aver lasciato delle righe vuote, possiamo anche partire dall'alto:

UltimaRigaX = Sheets("Foglio1").Range("A1").End(XlDown).Row

Altre alternative:

UltimaRigaX = .Range("A" & Rows.Count).End(xlUp).Row
UltimaRigaX = ActiveSheet.UsedRange.Rows.Count 'ultima riga del range utilizzato dall'utente in un certo foglio