Uno dei grandi vantaggi di Microsoft Excel è la capacità di automatizzare funzioni utili. Quando un foglio di calcolo aziendale contiene centinaia o addirittura migliaia di righe, potrebbe essere difficile spostarsi tra le sue celle. Elimina questo problema costruendo la tua funzione di ricerca. Utilizzando poche righe di codice, è possibile creare un VBA Sub che trova l'ultima riga in un foglio di calcolo e vi accede automaticamente.
1
Avvia Excel e apri un foglio di calcolo che contiene più colonne.
2
Premere "Alt-F11" per aprire l'editor "Visual Basic" e fare clic su "Inserisci | Modulo." VBA aggiunge un nuovo modulo alla finestra Progetto.
3
Incolla il codice seguente nella finestra di modifica che appare a destra della finestra Progetto:
Sub SelectLastRow() Dim finalRow As Integer
finalRow = ActiveSheet.UsedRange.Rows.Count
Se finalRow = 0 Allora finalRow = 1 End If
Righe (finalRow): seleziona End Sub
Questo Sub determina l'ultima riga del foglio di lavoro esaminando la proprietà Count della raccolta di righe. Il Sub quindi memorizza quel valore nella variabile finalRow. L'istruzione finale di Sub passa il valore di finalRow al metodo VBA Select.
4
Premere "F5" per eseguire il Sub. Il metodo Select trova l'ultima riga del foglio di calcolo, va a quella riga e la evidenzia.
