Odstráňte riadky na základe podmienok

Anonim

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