Ja jūs nopietni meklējat VBA kodu, lai palīdzētu jums izdzēst visas rindas, pamatojoties uz konkrētu slejā atrodamu tekstu, tad šis raksts ir domāts jums. Šajā rakstā mēs uzzināsim, kā izdzēst rindu, ja slejā ir atrodams konkrētais teksts.
Jautājums): Man ir fails, kurā man ir vajadzīgas tās rindas, kuru slejā B ir “Produkts B”. Es vēlos izdzēst visu pārējo. Vai kāds, lūdzu, varētu man palīdzēt uzrakstīt makro? Tālāk ir sniegts mūsu rīcībā esošo datu momentuzņēmums:
Mums jāveic šādas darbības:
- Noklikšķiniet uz cilnes Izstrādātājs
- Kodu grupā atlasiet Visual Basic
Standarta modulī ievadiet šādu kodu:
Sub DeleteRow ()
Ar 1. lapu. Šūnas (1). Pašreizējais reģions. Kolonnas (2)
Automātiskais filtrs 1, "Produkts B"
.Visa rinda.Delete
Beigt ar
Beigt apakš
Koda skaidrojums:
1. solis) Iepriekš minētais kods 2. kolonnā atlasīs pašreizējo reģionu, ti, kolonu Produkts
2. solis) Lietot filtru
3. solis) Redzamās šūnas tiks izdzēstas ar visu rindu. Dzēst kodu. Pārējie dati, t.i., ja produkts B atrodas slejā B, būs mūsu iznākums.
Tādā veidā, izmantojot VBA kodu, mēs varam izdzēst rindas, kas atbilst īpašiem nosacījumiem.
Lejupielādēt - dzēst rindas, pamatojoties uz nosacījumiem - xlsm