Come eliminare tutte le righe al di sotto di una determinata riga o della cella attiva in Excel?
Per eliminare tutte le righe al di sotto di una determinata riga o della cella attiva, questo articolo ti offre la soluzione ideale.
Elimina tutte le righe al di sotto di una determinata riga in Excel con codice VBA
Elimina tutte le righe al di sotto della cella attiva in Excel con codice VBA
Elimina tutte le righe al di sotto di una determinata riga in Excel con codice VBA
Il seguente codice VBA ti permette di eliminare tutte le righe al di sotto di una riga specifica in Excel.
1. Premi contemporaneamente i tasti Alt+F11 per aprire la finestra Microsoft Visual Basic for Applications.
2. Nella finestra Microsoft Visual Basic for Applications, fai clic su Inserisci > Modulo. Quindi copia e incolla il seguente codice VBA nella finestra del codice.
Codice VBA: Elimina tutte le righe al di sotto di determinate righe in Excel
Sub DeleteRowsBelow()
Worksheets("Sheet1").Rows(5 & ":" & Worksheets("Sheet1").Rows.Count).Delete
End SubNota: nel codice VBA, il numero 5 e Foglio1 indicano che tutte le righe dalla riga 5 in poi (inclusa la riga 5) nel Foglio1 verranno eliminate dopo l'esecuzione del codice. Puoi modificarli in base alle tue esigenze.
3. Premi il tasto F5 per eseguire il codice. Tutte le righe dalla 5 in poi (inclusa la riga 5) verranno eliminate immediatamente, come mostrato nello screenshot seguente.
Sblocca la magia di Excel con KUTOOLS AI
- Esecuzione intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici, il tutto con comandi semplici e intuitivi.
- Formule personalizzate: crea formule su misura per ottimizzare i tuoi flussi di lavoro.
- Codifica VBA: Scrivi e implementa codice VBA in modo semplice e immediato.
- Interpretazione delle formule: Comprendi con facilità anche le formule più complesse.
- Traduzione del testo: Superate le barriere linguistiche direttamente nei vostri fogli di calcolo.
Elimina tutte le righe al di sotto della cella attiva in Excel con codice VBA
Per eliminare tutte le righe immediatamente al di sotto della riga contenente la cella attiva in Excel, puoi utilizzare il seguente codice VBA.
1. Seleziona una cella al di sotto della quale desideri eliminare tutte le righe, quindi premi contemporaneamente i tasti Alt+F11 per aprire la finestra Microsoft Visual Basic for Applications.
2. In Microsoft Visual Basic for Applications, fai clic su Inserisci > Modulo. Quindi, copia e incolla il seguente codice VBA nella finestra del codice.
Codice VBA: Elimina tutte le righe al di sotto della riga della cella attiva in Excel
Sub DeleteAllBelow()
Rows(ActiveCell.Row & ":" & Rows.Count).Delete
End Sub3. Premi il tasto F5 per eseguire il codice. Tutte le righe dalla cella attiva in giù (inclusa quella della cella attiva) verranno eliminate immediatamente.
Articoli correlati:
- Come eliminare tutte le righe in Excel tranne la prima riga di intestazione?
- Come eliminare le righe in cui la cella è maggiore o minore di un determinato valore in Excel?
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi