Jak wyodrębnić rekord bez kryteriów za pomocą VBA?

Anonim

W tym artykule dowiemy się, jak wyodrębnić rekord bez kryteriów za pomocą VBA w programie Microsoft Excel.

Weźmy przykład, aby zrozumieć, jak możemy umieścić filtr i wybrać kryteria, a następnie podjąć wymagane działanie:-

Mamy dane w zakresie A:G kolumny, w których kolumna A zawiera nazwę, kolumna b zawiera adres, kolumna C zawiera miasto, kolumna D region, kolumna E kraj, kolumna F numer telefonu, a kolumna G zawiera kryteria.

Chcemy napisać makro, aby umieścić filtr, a następnie przefiltrować dane według Nie zawiera danych w kolumnie G, a następnie usunąć dane Nie zawiera. A następnie usuń filtr i pokaż wszystkie dane.

Aby wyodrębnić rekord z kryteriami Nie, wykonaj poniższe kroki:

  • Otwórz stronę VBA naciśnij klawisz Alt + F11
  • Włóż moduł
  • Następnie przejdź ponownie do menu wstawiania i kliknij procedurę, gdzie otrzymasz procedurę, jeśli nie wiesz jak należy uruchomić makro
  • Napisz poniższy kod:
Sub Delete_NotEligible() ActiveSheet.Range("$A$1:$G$15").AutoFilter Field:=7, Criteria1:="" Rows("2:12").Select Selection.Delete Shift:=xlUp Range(" B1"). Wybierz zaznaczenie. Autofiltr End Sub 
  • Aby uruchomić kod, naciśnij klawisz F5 na klawiaturze.
  • Dane zostaną przefiltrowane, a następnie zgodnie z ustawionymi kryteriami przefiltrowane dane zostaną usunięte.

Wyjaśnienie kodu:

  • Zdefiniowaliśmy zakres danych nagłówka, aby umieścić filtr z kryteriami niepustych komórek w kolumnie kwalifikowalności
  • Zdefiniuj w kodzie, aby wybrać wiersz, a następnie usunie cały wiersz
  • Na koniec otwórz filtr

W ten sposób możemy ustawić filtr na podstawie określonych kryteriów, a następnie usunąć dane.

Jeśli podobały Ci się nasze blogi, podziel się nimi ze znajomymi na Facebooku. A także możesz śledzić nas na Twitterze i Facebooku.

Chcielibyśmy usłyszeć od Ciebie, daj nam znać, jak możemy ulepszyć, uzupełnić lub unowocześnić naszą pracę i uczynić ją lepszą dla Ciebie. Napisz do nas na stronie e-mail