Elimina righe con celle vuote in una certa colonna utilizzando VBA in Microsoft Excel
In questo articolo creeremo una macro per eliminare i record incompleti che contengono celle vuote.
I dati grezzi sono costituiti da alcuni dati di esempio, che includono Nome, Età e Sesso. Contiene anche alcune celle vuote.
Vogliamo rimuovere quei record che contengono celle vuote.
Spiegazione logica
Abbiamo creato la macro “BlankRowDeletion” per eliminare i record incompleti.
Cerca e seleziona celle vuote, quindi elimina l’intera riga che contiene una cella vuota.
Spiegazione del codice
Set Rng = Range (“A9: C” & LastRow)
Il codice precedente viene utilizzato per creare un oggetto intervallo per i dati forniti.
Rng.SpecialCells (xlCellTypeBlanks) .Select Il codice precedente viene utilizzato per selezionare celle vuote all’interno dell’intervallo specificato.
Selection.EntireRow.Delete Il codice precedente viene utilizzato per eliminare l’intera riga per la cella selezionata.
Segui sotto per il codice
Option Explicit
Sub BlankRowDeletion()
'Declaring variables
Dim LastRow As Long
Dim Rng As Range
'Getting row number of last cell
LastRow = Range("A1").SpecialCells(xlCellTypeLastCell).Row
'Selecting all data
Set Rng = Range("A9:C" & LastRow)
'Selecting Blank cells
Rng.SpecialCells(xlCellTypeBlanks).Select
'Deleting complete row
Selection.EntireRow.Delete
Range("A9").Select
End Sub
Se ti è piaciuto questo blog, condividilo con i tuoi amici su Facebook e Facebook.
Ci piacerebbe sentire la tua opinione, facci sapere come possiamo migliorare il nostro lavoro e renderlo migliore per te. Scrivici a [email protected]