In dit artikel gaan we leren hoe u een record kunt extraheren zonder criteria via VBA in Microsoft Excel.
Laten we een voorbeeld nemen om te begrijpen hoe we het filter kunnen plaatsen en de criteria kunnen selecteren en vervolgens de vereiste actie kunnen ondernemen:-
We hebben gegevens in bereik A:G kolommen, waarin kolom A Naam bevat, kolom b Adres, kolom C stad, kolom D regio, kolom E land, kolom F telefoonnummer en kolom G bevat criteria.
We willen de macro schrijven om het filter te plaatsen en vervolgens de gegevens filteren volgens Niet bevat gegevens in de G-kolom en vervolgens de Niet bevat gegevens verwijderen. En verwijder vervolgens het filter en toon alle gegevens.
Volg onderstaande stappen om een record met Niet-criteria te extraheren:
- Open VBA-pagina druk op de toets Alt+F11
- Een module invoegen
- Ga dan opnieuw naar menu invoegen en klik op procedure, waar u de procedure krijgt als u niet weet hoe u de macro moet starten
- Schrijf de onderstaande code:
Sub Delete_NotEligible() ActiveSheet.Range("$A$1:$G$15").AutoFilter Field:=7, Criteria1:="" Rows("2:12").Select Selection.Delete Shift:=xlUp Range(" B1").Selecteer Selectie.AutoFilter End Sub
- Om de code uit te voeren, drukt u op de toets F5 op het toetsenbord.
- Gegevens worden gefilterd en vervolgens worden volgens ingestelde criteria gefilterde gegevens verwijderd.
Code Verklaring:
- We hebben het kopbereik van gegevens gedefinieerd om het filter met criteria van niet-lege cellen in de geschiktheidskolom te plaatsen
- Definieer in de code om de rij te selecteren en verwijder vervolgens de hele rij
- Open aan het einde het filter
Op deze manier kunnen we het filter op basis van bepaalde criteria plaatsen en vervolgens de gegevens verwijderen.
Als je onze blogs leuk vond, deel deze dan met je vrienden op Facebook. En je kunt ons ook volgen op Twitter en Facebook.
We horen graag van je, laat ons weten hoe we ons werk kunnen verbeteren, aanvullen of vernieuwen en het voor jou beter kunnen maken. Schrijf ons op de e-mailsite