Pokud jste vážně po kódu VBA, který vám pomůže s odstraněním všech řádků na základě konkrétního textu nalezeného v konkrétním sloupci, pak je tento článek pro vás. V tomto článku se naučíme, jak odstranit řádek, pokud se konkrétní text nachází ve sloupci.
Otázka): Mám soubor, kde potřebuji pouze ty řádky, které mají ve sloupci B. „Produkt B“. Chci odstranit vše ostatní. Může mi někdo prosím pomoci s napsáním makra? Následuje snímek dat, která máme:
Musíme postupovat podle následujících kroků:
- Klikněte na kartu Vývojář
- Ze skupiny kódů vyberte Visual Basic
Do standardního modulu zadejte následující kód:
Sub DeleteRow ()
S Sheet1.Cells (1) .CurrentRegion.Columns (2)
.AutoFilter 1, „Produkt B“
.EntireRow.Delete
Konec s
End Sub
Vysvětlení kódu:
Krok 1) Výše uvedený kód vybere aktuální oblast ze sloupce 2, tj. Sloupce Produkt
Krok 2) Použijte filtr
Krok 3) Viditelné buňky budou odstraněny s celým řádkem. Smazat kód. Zbytek dat, tj. Tam, kde produkt B existuje ve sloupci B, bude naším výstupem.
Tímto způsobem můžeme pomocí kódu VBA odstranit řádky splňující konkrétní podmínky.
Stáhnout - Odstranit řádky na základě podmínek - xlsm