Ștergeți rândurile pe baza condițiilor

Anonim

Dacă sunteți în serios după un cod VBA pentru a vă ajuta să ștergeți toate rândurile pe baza textului specific găsit într-o anumită coloană, atunci acest articol este pentru dvs. În acest articol, vom afla cum să ștergeți un rând dacă textul specific se găsește într-o coloană.

Întrebare): Am un fișier în care am nevoie doar de acele rânduri care au „Produsul B” în coloana B. Vreau să șterg orice altceva. Vă poate ajuta cineva vă rog să scriu un macro? Urmează instantaneul datelor pe care le avem:

Trebuie să urmăm pașii de mai jos:

  • Faceți clic pe fila Dezvoltator
  • Din grupul de coduri, selectați Visual Basic

Introduceți următorul cod în modulul standard:

Sub DeleteRow ()

Cu Sheet1.Cells (1) .CurrentRegion.Columns (2)

.AutoFilter 1, „Produsul B”

.EntireRow.Elete

Se termina cu

Sfârșitul Sub

Explicarea codului:

Pasul 1) Codul de mai sus va selecta regiunea curentă din coloana 2, adică coloana Produs

Pasul 2) Aplicați filtrul

Pasul 3) Celulele vizibile vor fi șterse cu întregul rând. Ștergeți codul. Restul datelor, adică unde Produsul B există în coloana B, vor fi rezultatul nostru.

În acest fel, folosind codul VBA, putem șterge rânduri care îndeplinesc condiții specifice.

Descărcare - Ștergeți rândurile în funcție de condiții - xlsm