Hvis du seriøst er ute etter en VBA -kode for å hjelpe deg med å slette alle radene basert på spesifikk tekst som finnes i en bestemt kolonne, så er denne artikkelen noe for deg. I denne artikkelen lærer vi hvordan du sletter en rad hvis den spesifikke teksten finnes i en kolonne.
Spørsmål): Jeg har en fil der jeg bare trenger de radene som har "Produkt B" i kolonne B. Jeg vil slette alt annet. Kan noen hjelpe meg med å skrive en makro? Følgende er øyeblikksbildet av dataene vi har:
Vi må følge trinnene nedenfor:
- Klikk på kategorien Utvikler
- Velg Visual Basic fra kodegruppen
Skriv inn følgende kode i standardmodulen:
Sub DeleteRow ()
Med Sheet1.Cells (1) .CurrentRegion.Columns (2)
.AutoFilter 1, "Produkt B"
.EntireRow.Delete
Slutt med
Slutt Sub
Kode forklaring:
Trinn 1) Koden ovenfor vil velge gjeldende region fra kolonne 2, dvs. produktkolonne
Trinn 2) Påfør filter
Trinn 3) De synlige cellene blir slettet med hele raden. Slett kode. Resten av dataene, dvs. hvor produkt B finnes i kolonne B, vil være vår produksjon.
På denne måten kan vi ved å bruke VBA -kode slette rader som oppfyller spesifikke betingelser.
Last ned - Slett rader basert på forhold - xlsm