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