Ak vážne hľadáte kód VBA, ktorý vám pomôže s odstránením všetkých riadkov na základe konkrétneho textu nachádzajúceho sa v konkrétnom stĺpci, potom je tento článok pre vás. V tomto článku sa naučíme, ako odstrániť riadok, ak sa konkrétny text nachádza v stĺpci.
Otázka): Mám súbor, kde potrebujem iba tie riadky, ktoré majú v stĺpci B „Produkt B“. Chcem odstrániť všetko ostatné. Vie mi niekto pomôcť s napísaním makra? Nasleduje prehľad údajov, ktoré máme:
Musíme postupovať podľa nasledujúcich krokov:
- Kliknite na kartu Vývojár
- V skupine Kód vyberte položku Visual Basic
Do štandardného modulu zadajte nasledujúci kód:
Sub DeleteRow ()
With Sheet1.Cells (1) .CurrentRegion.Columns (2)
.AutoFilter 1, „Produkt B“
.EntireRow.Delete
Ukončiť s
Koniec pod
Vysvetlenie kódu:
Krok 1) Vyššie uvedený kód vyberie aktuálnu oblasť zo stĺpca 2, tj. Zo stĺpca Produkt
Krok 2) Naneste filter
Krok 3) Viditeľné bunky budú odstránené s celým riadkom. Odstráňte kód. Ostatné údaje, tj. Tam, kde v stĺpci B existuje produkt B, budú naším výstupom.
Týmto spôsobom pomocou kódu VBA môžeme odstrániť riadky spĺňajúce konkrétne podmienky.
Stiahnuť - Odstrániť riadky podľa podmienok - xlsm