Ta bort rader baserat på villkor

Anonim

Om du seriöst efter en VBA -kod för att hjälpa dig att radera alla rader baserat på specifik text som finns i en viss kolumn, är den här artikeln för dig. I den här artikeln lär vi oss hur man tar bort en rad om den specifika texten finns i en kolumn.

Fråga): Jag har en fil där jag bara behöver de raderna som har "Produkt B" i kolumn B. Jag vill ta bort allt annat. Kan någon snälla hjälpa mig att skriva ett makro? Följande är ögonblicksbilden av data vi har:

Vi måste följa stegen nedan:

  • Klicka på fliken Utvecklare
  • Välj Visual Basic i kodgruppen

Ange följande kod i standardmodulen:

Sub DeleteRow ()

Med Sheet1.Cells (1) .CurrentRegion.Columns (2)

.AutoFilter 1, "Produkt B"

.EntireRow.Delete

Sluta med

Avsluta Sub

Kodförklaring:

Steg 1) Koden ovan väljer aktuell region från kolumn 2, dvs produktkolumn

Steg 2) Applicera filter

Steg 3) De synliga cellerna raderas med hela raden. Radera kod. Resten av data, dvs där produkt B finns i kolumn B kommer att vara vår produktion.

På så sätt kan vi radera rader som uppfyller specifika villkor med hjälp av VBA -kod.

Ladda ner - Radera rader baserat på villkor - xlsm