Hvis du seriøst leder efter en VBA -kode for at hjælpe dig med at slette alle rækker baseret på specifik tekst, der findes i en bestemt kolonne, så er denne artikel noget for dig. I denne artikel lærer vi, hvordan du sletter en række, hvis den specifikke tekst findes i en kolonne.
Spørgsmål): Jeg har en fil, hvor jeg bare har brug for de rækker, der har "Produkt B" i kolonne B. Jeg vil slette alt andet. Kan nogen venligst hjælpe mig med at skrive en makro? Følgende er et øjebliksbillede af data, vi har:
Vi skal følge nedenstående trin:
- Klik på fanen Udvikler
- Vælg Visual Basic i kodegruppen
Indtast følgende kode i standardmodulet:
Sub DeleteRow ()
Med Sheet1.Cells (1) .CurrentRegion.Columns (2)
.AutoFilter 1, "Produkt B"
.EntireRow.Delete
Afslut med
Afslut Sub
Kode forklaring:
Trin 1) Ovenstående kode vælger den aktuelle region fra kolonne 2, dvs. produktkolonne
Trin 2) Anvend filter
Trin 3) De synlige celler slettes med hele rækken. Slet kode. Resten af dataene, dvs. hvor Produkt B findes i kolonne B, er vores output.
På denne måde kan vi ved hjælp af VBA -kode slette rækker, der opfylder specifikke betingelser.
Download - Slet rækker baseret på betingelser - xlsm