Come si eliminano le righe con valori negativi in Excel?
Supponiamo che tu abbia il seguente intervallo di dati e che tu voglia eliminare l’intera riga se il numero nella colonna B è negativo. Esistono metodi efficaci per risolvere questo problema in Excel?
 |  |  | Elimina righe con numeri negativi utilizzando codice VBA Elimina righe con numeri negativi utilizzando Kutools per Excel |
Elimina righe con numeri negativi utilizzando codice VBA
Il seguente codice VBA ti permette di eliminare l’intera riga se nella colonna specificata sono presenti numeri negativi. Procedi come segue:
1. Tieni premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic, Applications.
2. Fai clic su Inserisci > Modulo, quindi incolla il codice seguente nella finestra del modulo.
Codice VBA: Elimina righe con numeri negativi
Sub Deleter()
'updatebyExtendoffice
Dim xRg As Range
Dim xCell As Range
Dim xTxt As String
Dim I As Long
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Sel:
Set xRg = Nothing
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "does not support multiple selections, please select again", vbInformation, "Kutools for Excel"
GoTo Sel
End If
If xRg.Columns.Count > 1 Then
MsgBox "does not support multiple columns, please select again", vbInformation, "Kutools for Excel"
GoTo Sel
End If
For I = xRg.Rows.Count To 1 Step -1
If xRg.Cells(I) < 0 Then xRg.Cells(I).EntireRow.Delete
Next
End Sub
3. Premi quindi il tasto F5 per eseguire il codice. Nella finestra di dialogo visualizzata, seleziona la colonna numerica da cui desideri individuare i numeri negativi (vedi screenshot):
4. Fai quindi clic sul pulsante OK; le righe contenenti numeri negativi verranno eliminate immediatamente.
Elimina righe con numeri negativi utilizzando Kutools per Excel
Per eseguire questa operazione, l’utility Kutools per Excel – Seleziona celle specifiche – include una funzionalità estremamente utile: grazie a essa, puoi innanzitutto selezionare le righe intere contenenti valori negativi e successivamente eliminarle secondo necessità.
| Kutools per Excel:con oltre 300 pratici componenti aggiuntivi per Excel, prova gratuita senza limitazioni per 30 giorni. |
Dopo aver installato Kutools per Excel, procedi come segue:
1. Seleziona la colonna che contiene i numeri negativi che vuoi eliminare.
2. Quindi fai clic su Kutools > Seleziona > Seleziona celle specifiche (vedi screenshot):
3. Nella finestra di dialogo Seleziona celle specifiche, seleziona l’opzione Riga intera in Seleziona tipo, quindi scegli Minore di dal menu a discesa Specifica tipo e inserisci 0 nella casella di testo accanto ai criteri (vedi screenshot):
4. Fai quindi clic su Ok: le righe contenenti numeri negativi verranno selezionate immediatamente. A questo punto, fai clic su Home > Elimina > Elimina righe del foglio per rimuovere le righe selezionate (vedi screenshot):
 | |  |
Suggerimenti： Puoi anche fare clic con il pulsante destro del mouse e scegliere Elimina dal menu contestuale per cancellare le righe selezionate.
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