Dirbdami su dideliais duomenų rinkiniais „Excel“, gali tekti išvalyti duomenis, kad galėtumėte juos naudoti toliau. Vienas įprastas duomenų valymo žingsnis yra ištrinti tuščias eilutes.
Dabar galite tai padaryti įvairiais būdais:
- Eikite į kiekvieną tuščią eilutę ir ištrinkite ją rankiniu būdu (per daug nuobodu ir daug laiko).
- Rūšiuokite visą duomenų rinkinį taip, kad visos tuščios eilutės būtų apačioje (veikia, bet keičia duomenų rinkinį).
- Naudokite „Eiti į specialią techniką“ (arba makrokomandą), kad iš karto pažymėtumėte visas tuščias langelius ir ištrintumėte eilutes (kelias eiti).
Ištrinkite tuščias eilutes (tuščias eilutes) „Excel“
Šioje pamokoje sužinosite du būdus, kaip greitai pasirinkti tuščius duomenų rinkinio langelius:
- Naudokite dialogo langą Eiti į specialųjį.
- Naudojant VBA makrokomandą.
Pasirinkę tuščius langelius, galite lengvai juos ištrinti.
Naudokite „Eiti į specialią techniką“, kad ištrintumėte tuščias eilutes „Excel“
Tarkime, kad turite duomenų rinkinį, kaip parodyta žemiau:
Aukščiau pateiktuose duomenyse yra trys tuščios eilutės.
Štai veiksmai, kaip greitai ištrinti tuščias eilutes (tuščias eilutes) iš šio duomenų rinkinio.
- Pasirinkite visą duomenų rinkinį (šiuo atveju A1: C13).
- Paspauskite klavišą F5. Bus atidarytas dialogo langas Eiti į.
- Šį dialogo langą galite gauti apsilankę Pradžia -> Redagavimas -> Rasti ir pasirinkti -> Eiti į.
- Dialogo lange Eiti į spustelėkite specialų mygtuką. Bus atidarytas dialogo langas Eiti į specialųjį.
- Dialogo lange Eiti į specialųjį elementą pasirinkite Blanks.
- Spustelėkite Gerai.
Taip būtų pasirinktos visos tuščios duomenų rinkinio ląstelės.
Dabar, kai pasirinkote visas tuščias eilutes, atlikite šiuos veiksmus, kad ištrintumėte šias eilutes:
- Dešiniuoju pelės mygtuku spustelėkite bet kurią pasirinktą langelį ir pasirinkite Ištrinti.
- Dialogo lange Ištrinti pasirinkite „Visa eilutė“.
- Spustelėkite Gerai.
Tai iš karto ištrintų visas tuščias duomenų rinkinio eilutes.
Atminkite, kad ši technika ištrintų visą eilutę, o tai reiškia, kad jei duomenų rinkinio kairėje/dešinėje turite kokių nors duomenų, jie taip pat bus ištrinti. Jei nenorite, kad taip atsitiktų, pasirinkite parinktį Perkelti langelius aukštyn. Taip būtų ištrinti tik duomenų rinkinio langeliai/eilutės, o visos kitos aplink jį esančios ląstelės liktų nepažeistos.
Čia yra vaizdo įrašas, kuriame parodyta, kaip naudoti aukščiau nurodytus veiksmus, norint ištrinti tuščias eilutes „Excel“.
VBA makrokomandos naudojimas tuščioms eilutėms ištrinti „Excel“
Nors „Go-To Special“ technika yra daug greitesnė nei bet kuris kitas įprastas metodas, jei jūsų darbas reikalauja, kad toje pačioje darbaknygėje kelis kartus ištrintumėte tuščias eilutes, naudojant paprastą VBA makrokomandą būtų galima greičiau.
Galite parašyti paprastą VBA kodą, kuris parinks visas tuščias duomenų rinkinio ląsteles. Pasirinkę galite juos formatuoti, ištrinti arba įvesti vertę.
Nors tai galima padaryti naudojant dialogo langą „Excel Go to Special“, jei sukursite makrokomandą ir pridėsite ją prie sparčiosios prieigos įrankių juostos, spustelėję mygtuką galėsite pasirinkti visas tuščias langelius (taip sutaupysite keletą paspaudimų).
Štai kaip sukurti VBA kodą, kad pasirinktumėte tuščias langelius/eilutes „Excel“:
- Pasirinkę darbaknygę paspauskite ALT + F11. Bus atidarytas VB redaktoriaus langas.
- VB redaktoriuje kairėje būtų projektų tyrinėtojo sritis. Jei nerandate, eikite į „View“ -> „Project Explorer“.
- Dešiniuoju pelės mygtuku spustelėkite bet kurį darbaknygės, kurioje dirbate, objektą ir eikite į Įterpti -> Modulis.
- Modulio lange nukopijuokite ir įklijuokite šį kodą:
Sub SelectBlanks () Selection.SpecialCells (xlCellTypeBlanks). Pasirinkite End Sub
- Uždarykite VB redaktoriaus langą arba paspauskite Alt + F11, kad grįžtumėte į darbalapį.
- Dešiniuoju pelės mygtuku spustelėkite bet kurį juostos skirtuką ir pasirinkite Tinkinti greitosios prieigos įrankių juostą.
- Dialogo lange „Excel“ parinktys, išskleidžiamajame meniu pasirinkite komandas, pasirinkite Makrokomandos.
- Pasirinkite „Macro SelectBlanks“ ir spustelėkite mygtuką „Pridėti“.
- Spustelėkite Gerai.
Dabar turėsite makrokomandą QAT. Tai tik vienkartinis procesas ir dabar, kai turite duomenų rinkinį ir norite iš jo ištrinti tuščias eilutes, pasirinkite duomenis ir spustelėkite KAT makrokomandos piktogramą.
Tai pasirinktų visas tuščias eilutes ir tada jas ištrintumėte.
Pastaba:
- Kadangi šioje darbaknygėje yra VBA kodas, būtinai išsaugokite jį .xls arba .xlsm formatu.
- Naudojant makrokomandą iš QAT veiktų TIK darbaknygėje, kurioje yra makrokomandos kodas. Jei norite, kad tai veiktų kitoje darbaknygėje, turėsite įdėti kodą (tačiau makrokomandos mygtukas QAT bus pasiekiamas visose darbaknygėse). Jei norite, kad tai būtų pasiekiama visose darbaknygėse, apsvarstykite galimybę sukurti priedą.
Taigi tai yra du paprasti būdai, kuriais galite pasinaudoti ištrinkite tuščias „Excel“ eilutes (su VBA ir be jos).
Tikiuosi, kad ši pamoka jums buvo naudinga!
