Jak extrahovat záznam bez kritérií prostřednictvím VBA

Anonim

V tomto článku se naučíme, jak pomocí VBA v aplikaci Microsoft Excel extrahovat záznam bez kritérií.

Uveďme si příklad, abychom pochopili, jak můžeme vložit filtr, vybrat kritéria a poté provést požadovanou akci:-

Máme data v rozsahu A: G sloupce, ve kterých sloupec A obsahuje název, sloupec b obsahuje adresu, sloupec C obsahuje město, sloupec D region, sloupec E země, sloupec F telefonní číslo a sloupec G obsahuje kritéria.

Chceme napsat makro, které vloží filtr a poté filtrovat data podle Neobsahuje data ve sloupci G a poté odstranit Neobsahuje data. Poté filtr odeberte a zobrazte všechna data.

Chcete -li extrahovat záznam s kritériem Není, postupujte podle následujících kroků:

  • Otevřete stránku VBA stisknutím klávesy Alt+F11
  • Vložte modul
  • Poté znovu přejděte do nabídky pro vložení a klikněte na postup, kde postup získáte, pokud nevíte, jak by mělo být makro spuštěno
  • Napište níže uvedený kód:
Sub Delete_NotEitable () ActiveSheet.Range ("$ A $ 1: $ G $ 15"). Pole AutoFilter: = 7, Criteria1: = "" Řádky ("2:12"). Vyberte Selection.Delete Shift: = xlUp Range (" B1 "). Vyberte Selection.AutoFilter End Sub 
  • Kód spustíte stisknutím klávesy F5 na klávesnici.
  • Data budou filtrována a poté budou filtrovaná data podle nastavených kritérií odstraněna.

Vysvětlení kódu:

  • Definovali jsme rozsah hlaviček dat, abychom do sloupce způsobilosti vložili filtr s kritérii neprázdných buněk
  • Definováním kódu vyberte řádek a poté celý řádek smažete
  • Na konci otevřete filtr

Tímto způsobem můžeme umístit filtr na základě konkrétních kritérií a poté data smazat.

Pokud se vám naše blogy líbily, sdílejte je se svými přáteli na Facebooku. A také nás můžete sledovat na Twitteru a Facebooku.

Rádi bychom od vás slyšeli, dejte nám vědět, jak můžeme zlepšit, doplnit nebo inovovat naši práci a zlepšit ji pro vás. Napište nám na e -mail