Come si eliminano le righe in cui una cella è maggiore o minore di un determinato valore in Excel?
A volte potrebbe essere necessario eliminare righe in cui le celle di una colonna specificata sono maggiori o minori di un determinato valore in Excel. Questo articolo illustra diversi metodi efficaci per risolvere questo problema.
Elimina righe se la cella è maggiore/minore di un determinato valore con codice VBA
Elimina righe se la cella è maggiore/minore di un determinato valore con Kutools per Excel
Elimina righe se la cella è maggiore/minore di un determinato valore con Kutools for Excel
Elimina righe se la cella è maggiore/minore di un determinato valore con codice VBA
Supponiamo di voler eliminare l’intera riga se la cella nella colonna D è maggiore o minore di un valore specifico in Excel. È possibile utilizzare il seguente codice VBA per ottenere il risultato desiderato.
1. Premere contemporaneamente i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic, Applications.
2. Nella finestra di Microsoft Visual Basic, Applications, fai clic su Inserisci > Modulo. Poi copia e incolla il seguente codice VBA nella finestra del codice.
Codice VBA: Elimina righe se la cella è maggiore/minore di un determinato valore in Excel
Public Sub ProcessData()
Dim xRg As Range
Dim xTxt As String
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
MsgBox "You can only select one column per time", vbInformation, "Kutools for Excel"
Exit Sub
End If
xRg.Range("A1").EntireRow.Insert
Set xRg = xRg.Range("A1").Offset(-1).Resize(xRg.Rows.Count + 1)
xRg.Range("A1") = "Temp"
xRg.AutoFilter 1, ">30000"
Set xRg = Application.Intersect(xRg, xRg.SpecialCells(xlCellTypeVisible))
On Error GoTo 0
If Not xRg Is Nothing Then xRg.EntireRow.Delete
End SubNota: nel codice precedente, >30000 indica che verranno eliminate le righe se le celle sono maggiori di 30000 in una colonna specificata. Se si desidera eliminare le righe quando le celle sono minori di un determinato valore, basta sostituire il simbolo > con < e indicare il valore desiderato.
3. Premere il tasto F5 per eseguire il codice. Nella finestra di dialogo Kutools per Excel visualizzata, selezionare l’intervallo (una singola colonna in cui individuare le celle maggiori o minori di un determinato valore). Fare quindi clic sul pulsante OK. Vedere lo screenshot:
Vengono eliminate immediatamente tutte le righe i cui valori nella colonna D superano 30.000.
Elimina righe se la cella è maggiore/minore di un determinato valore con Kutools per Excel
La funzione Seleziona celle specifiche di Kutools per Excel ti permette di selezionare tutte le righe in cui le celle sono maggiori o minori di un determinato valore in una colonna specificata; potrai poi eliminare manualmente tutte le righe selezionate in un’unica operazione.
1. Seleziona la colonna in base alla quale desideri eliminare le righe, quindi fai clic su Kutools > Seleziona > Seleziona celle specifiche. Vedi lo screenshot:
2. Nella finestra di dialogo Seleziona celle specifiche, seleziona Riga intera nella sezione Seleziona tipo. Nella sezione Specifica tipo, scegli Maggiore di o Minore di dal primo elenco a discesa, inserisci il valore desiderato nella casella successiva e fai clic sul pulsante OK.
3. Viene visualizzata una finestra di dialogo che indica quante righe sono state selezionate; fai clic sul pulsante OK. Noterai che tutte le righe con valori superiori a 30000 nella colonna D vengono selezionate immediatamente.
4. Fare clic con il pulsante destro del mouse su una delle righe selezionate, quindi scegliere Elimina dal menu contestuale. Tutte le righe selezionate verranno eliminate.
Se desidera provare gratuitamente (30 giorni) questa utility, faccia clic qui per scaricarla, quindi segua la procedura illustrata nei passaggi sopra.
Elimina righe se la cella è maggiore/minore di un determinato valore con Kutools for Excel
Oltre ai due metodi descritti sopra, puoi filtrare tutte le righe con celle maggiori o minori di un determinato valore in una colonna specificata, quindi eliminare le righe filtrate con l’utilità Elimina righe e colonne nascoste (visibili) di Kutools per Excel.
1. Seleziona l’intestazione della colonna, quindi fai clic su Dati > Filtro. Vedi lo screenshot:
2. Fare clic sulla freccia a discesa nella colonna in base alla quale si desidera eliminare righe, quindi scegliere Filtri numerici > Maggiore di oppure Minore di, come mostrato nello screenshot seguente:
3. Nella finestra di dialogo Filtro automatico personalizzato, inserisci il numero desiderato dopo la casella «è maggiore di» o «è minore di», quindi fai clic sul pulsante OK.
4. Vengono così filtrate tutte le righe con celle maggiori o minori di un determinato valore nella colonna D. Per eliminare tutte le righe filtrate, seleziona i dati filtrati e fai clic su Kutools > Elimina > Elimina righe/colonne nascoste (visibili). Vedere lo screenshot:
5. Nella finestra di dialogo Elimina righe/colonne nascoste (visibili), assicurati che l’opzione Intervallo selezionato sia selezionata nel menu a discesa Cerca in, scegli Righe nella sezione Tipo di eliminazione, imposta l’opzione Righe visibili nella sezione Tipo dettagliato e infine fai clic sul pulsante OK.
6. Vengono immediatamente eliminate tutte le righe visibili nell’intervallo selezionato. Per rimuovere il filtro, fare clic su Dati > Filtro.
Se desidera provare gratuitamente (30 giorni) questa utility, faccia clic qui per scaricarla, quindi segua la procedura illustrata nei passaggi sopra.
Articoli correlati:
- Come eliminare tutte le righe al di sotto di una determinata riga o della cella attiva in Excel?
- Come eliminare tutte le righe tranne la prima riga di intestazione 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