Kuviga/kuratidza mitsara isingakoshi nemakoramu

Kugadziriswa kwedambudziko

Ngatitii tine tafura yakadaro yatinofanira "kutamba" nayo mazuva ese:

 

Kune avo tafura inoratidzika sediki - mupfungwa iwedzere makumi maviri nenharaunda, kuwedzera mamwe mabhuroko maviri uye gumi nemaviri maguta makuru. 

Basa racho nderekubvisa kwenguva pfupi kubva pachiratidziro mitsara nemakoramu ayo parizvino asingakoshese basa, kureva, 

  • vanza mashoko pamwedzi, uchisiya makota chete
  • uvanze hwerengedzo nemwedzi nechikamu, uchisiya hwerengedzo chete kwehafu yegore
  • kuvanza maguta asina kufanira panguva ino (ndinoshanda muMoscow - nei ndichifanira kuona St. Petersburg?), nezvimwewo.

Muhupenyu chaihwo, kune gungwa remienzaniso yematafura akadaro.

Method 1: Kuviga mitsara nemakoramu

Iyo nzira, kutaura chokwadi, ndeyechinyakare uye haina kunyatso batsira, asi mazwi maviri anogona kutaurwa nezvazvo. Chero mitsara yakambosarudzwa kana makoramu pabepa anogona kuvanzwa nekudzvanya-kurudyi koramu kana mutsara musoro uye kusarudza iwo murairo kubva pane zviri mukati menyu. Hide (Viga):

 

Kuti uratidze reverse, sarudza mitsara / makoramu ari padyo uye, nekudzvanya-kurudyi, sarudza kubva kumenyu, zvichiteerana, kuratidza (Unhide).

Dambudziko nderekuti iwe unofanirwa kubata nekoramu yega yega uye mutsara wega, izvo zvisingaite.

Nzira 2. Kubatana

Kana ukasarudza mitsara yakawanda kana makoramu uye wobva wasarudza kubva kumenyu Data – Group and Structure – Group (Data - Boka uye Rondedzero - Boka), ipapo vanozovharirwa muskweya bracket (yakabatanidzwa). Uyezve, mapoka anogona kuiswa kune rimwe kune rimwe (kusvika kumazinga masere ekugara anobvumidzwa):

Imwe nzira iri nyore uye nekukurumidza ndeyekushandisa nzira yekudimbudzira kiibhodhi kuunganidza mitsara yakasarudzwa kana makoramu. Alt+Shift+Kurudyi Museve, uye yekuisa mumapoka Alt+Shift+Kuruboshwe Museve, maererano.

Iyi nzira yekuvanza data isingaite iri nyore - unogona kudzvanya bhatani ne "+"Kana kuti"-", kana pamabhatani ane nhamba yekuisa nhanho mukona yekumusoro kuruboshwe rwebepa - ipapo mapoka ese edanho rinodiwa achapunzika kana kuwedzerwa kamwechete.

Uyewo, kana tafura yako iine mitsetse yepfupiso kana makoramu ane basa rekupfupikisa maseru akavakidzana, ndiko kuti, mukana (kwete 100% yechokwadi) iyo Excel achasika mapoka ose anodiwa mutafura nekufamba kumwe - kuburikidza nemenyu Dhata - Boka uye Chimiro - Gadzira Chimiro (Data - Boka uye Rondedzero - Gadzira Outline). Nehurombo, basa rakadaro rinoshanda zvisingatarisike uye dzimwe nguva rinoita zvisina maturo patafura dzakaoma. Asi unogona kuedza.

MuExcel 2007 uye nyowani, ese aya mafaro ari patebhu Data (Zuva) muboka   mamiriro (Outline):

Nzira 3. Kuviga mitsetse/makoramu ane makro

Iyi nzira ndiyo zvichida inonyanya kushandiswa. Ngatiwedzerei mutsara usina chinhu uye koramu isina chinhu pakutanga kwepepa redu tomaka nechero icon iyo mitsara nemakoramu atinoda kuvanza:

Iye zvino ngativhure Visual Basic Editor (ALT + F11), isa module nyowani isina chinhu mubhuku redu (menu Pinza – Module) uye tevedzera zvinyorwa zvemacros maviri akareruka ipapo:

Sub Hide() Dim cell As Range Application.ScreenUpdating = Nhema 'Dvisa screen updating kuti ukurumidze Kusero rega rega MuActiveSheet.UsedRange.Rows(1).Masero 'Iterate over all cells in the first row If cell.Value = "x " Zvadaro sero .EntireColumn.Hidden = Chokwadi 'kana muchitokisi x - viga koramu Inotevera Kune Imwe neimwe Sero MuActiveSheet.UsedRange.Columns(1).Masero 'anopinda nemumasero ese ekutanga koramu Kana cell.Value = "x" Zvadaro cell.EntireRow.Hidden = Chokwadi 'kana muchitokisi x - viga mutsara Unotevera Application.ScreenUpdating = True End Sub Show() Columns.Hidden = Nhema 'kanzura mitsetse yese yakavanda nemakoramu.Hidden = False End Sub  

Sezvaungafungidzira, iyo macro Hide hides uye macro ratidza -Inoratidza kumashure akanyorwa mitsara nemakoramu. Kana uchida, macros anogona kupihwa hotkeys (Alt + F8 uye bhatani Parameters), kana gadzira mabhatani zvakananga pabepa kuti uatange kubva patabhu Mugadziri – Pinza – Bhatani (Mugadziri - Isa - Bhatani).

Nzira 4. Kuviga mitsara / makoramu ane ruvara rwakapiwa

Ngatitii mumuenzaniso uri pamusoro apa, isu, pane zvinopesana, tinoda kuvanza zvikamu zvose, kureva mitsara yepepuru uye yakasviba uye mitsara yero uye yegirini. Ipapo macro edu ekare anozofanirwa kugadziridzwa zvishoma nekuwedzera, pachinzvimbo chekutarisa kuvepo kwe "x", cheki yekufananidza ruvara rwekuzadza nemasero akasarudzika akasarudzwa:

Sub HideByColor() Dim cell As Range Application.ScreenUpdating = Nhema Pasero rega rega MuActiveSheet.UsedRange.Rows(2).Masero Kana cell.Interior.Color = Range("F2").Interior.Color Then cell.YoseColumn.Yakavigwa = Chokwadi Kana sero.Interior.Color = Range("K2").Interior.Color Then sero.EntireColumn.Hidden = True Next For each cell In ActiveSheet.UsedRange.Columns(2).Masero Kana cell.Interior.Color = Range ("D6").Interior.Color Then cell.EntireRow.Hidden = True Kana cell.Interior.Color = Range("B11").Interior.Color Then cell.EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub  

Nekudaro, isu hatifanire kukanganwa nezve imwe caveat: iyi macro inoshanda chete kana maseru eiyo tsime tafura akazadzwa neruvara nemaoko, uye asingashandisi mafomati emamiriro (ichi chidimbu cheInterior.Color pfuma). Saka, semuenzaniso, kana iwe ukangoratidzira zvese zvibvumirano patafura yako iyo nhamba iri pasi pegumi uchishandisa mafomati ezvimiso:

Kuviga/kuratidza mitsara isingakoshi nemakoramu

... uye iwe unoda kuvavanza mukufamba kumwe chete, ipapo iyo yapfuura macro ichafanirwa "kupedzwa". Kana iwe uine Excel 2010-2013, saka iwe unogona kubuda uchishandisa panzvimbo yepfuma Interior pfuma DisplayFormat.Interior, iyo inoburitsa ruvara rwesero, zvisinei nekuti yakaiswa sei. Iyo macro yekuvanza mitsetse yebhuruu inogona kuzotaridzika seizvi:

Sub HideByConditionalFormattingColor() Dim cell As Range Application.ScreenUpdating = Nhema Pasero rega rega MuActiveSheet.UsedRange.Columns(1).Masero Kana cell.DisplayFormat.Interior.Color = Range("G2").DisplayFormat.Interior.Color Ipapo cell. .EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub  

Cell G2 inotorwa semuenzaniso wekuenzanisa kwemavara. Sezvineiwo pfuma DisplayFormat yakaonekwa muExcel chete kutanga kubva ku2010 vhezheni, saka kana uine Excel 2007 kana kupfuura, uchafanirwa kuuya nedzimwe nzira.

  • Chii chinonzi macro, kupi kwekuisa macro kodhi, maitiro ekuishandisa
  • Kuzvibatanidza otomatiki mumazita akawanda

 

Leave a Reply