Nọmbafoonu/fifihan awọn ori ila ati awọn ọwọn ti ko wulo

Ilana ti iṣoro naa

Ṣebi a ni iru tabili bẹ ti a ni lati “jo” pẹlu gbogbo ọjọ:

 

Si ẹniti tabili naa dabi kekere - ni opolo ṣe isodipupo o ni igba ogun nipasẹ agbegbe, fifi awọn bulọọki tọkọtaya kan kun ati awọn ilu nla mejila mejila. 

Iṣẹ-ṣiṣe ni lati yọkuro fun igba diẹ lati awọn ori ila iboju ati awọn ọwọn ti ko wulo lọwọlọwọ fun iṣẹ, ie, 

  • tọju awọn alaye nipasẹ oṣu, nlọ nikan awọn idamẹrin
  • tọju lapapọ nipasẹ awọn oṣu ati awọn mẹẹdogun, nlọ nikan lapapọ fun idaji ọdun kan
  • tọju awọn ilu ti ko ni dandan ni akoko yii (Mo ṣiṣẹ ni Moscow - kilode ti MO yoo rii St. Petersburg?), bbl

Ni igbesi aye gidi, okun ti awọn apẹẹrẹ ti iru awọn tabili wa.

Ọna 1: Tọju awọn ori ila ati awọn ọwọn

Ọna naa, ni otitọ, jẹ alakoko ati pe ko rọrun pupọ, ṣugbọn awọn ọrọ meji le sọ nipa rẹ. Eyikeyi awọn ori ila ti a ti yan tẹlẹ tabi awọn ọwọn lori dì le jẹ pamọ nipasẹ titẹ-ọtun iwe-iwe tabi akọsori ila ati yiyan aṣẹ lati inu akojọ aṣayan ọrọ-ọrọ tọju (Fipamọ):

 

Fun ifihan yiyipada, yan awọn ori ila / awọn ọwọn ti o wa nitosi ati, nipa titẹ-ọtun, yan lati inu akojọ aṣayan, lẹsẹsẹ, àpapọ (Ma fi pamọ).

Iṣoro naa ni pe o ni lati koju ọwọn kọọkan ati laini ni ẹyọkan, eyiti ko ni irọrun.

Ọna 2. Pipin

Ti o ba yan ọpọ awọn ori ila tabi awọn ọwọn lẹhinna yan lati inu akojọ aṣayan Data - Ẹgbẹ ati Eto - Ẹgbẹ (Data - Ẹgbẹ ati Ilana - Ẹgbẹ), lẹhinna wọn yoo wa ni pipade si akọmọ onigun mẹrin (ti a ṣajọpọ). Pẹlupẹlu, awọn ẹgbẹ le jẹ itẹ-ẹiyẹ ọkan si ekeji (to awọn ipele itẹ-ẹiyẹ 8 ni a gba laaye):

Ọna ti o rọrun diẹ sii ati yiyara ni lati lo ọna abuja keyboard kan si akojọpọ awọn ori ila tabi awọn ọwọn ti a ti yan tẹlẹ. Alt + Yi lọ + Ọfà ọtun, ati fun ungrouping Alt+Shift+Ọfà osi, lẹsẹsẹ.

Ọna yii ti fifipamọ data ti ko wulo jẹ irọrun diẹ sii - o le tẹ bọtini naa pẹlu “+"Tabi"-", tabi lori awọn bọtini pẹlu ipele akojọpọ nọmba ni igun apa osi oke ti dì - lẹhinna gbogbo awọn ẹgbẹ ti ipele ti o fẹ yoo ṣubu tabi faagun ni ẹẹkan.

Bakannaa, ti tabili rẹ ba ni awọn ori ila akojọpọ tabi awọn ọwọn pẹlu iṣẹ ti akopọ awọn sẹẹli adugbo, eyini ni, anfani (kii ṣe 100% otitọ) ti Excel oun yoo ṣẹda gbogbo awọn ẹgbẹ pataki ninu tabili pẹlu ọkan ronu - nipasẹ awọn akojọ Data - Ẹgbẹ ati Eto - Ṣẹda Ilana (Data - Ẹgbẹ ati Ilana - Ṣẹda Ilana). Laanu, iru iṣẹ kan n ṣiṣẹ ni airotẹlẹ ati nigbakan ṣe ọrọ isọkusọ lori awọn tabili idiju. Sugbon o le gbiyanju.

Ni Excel 2007 ati tuntun, gbogbo awọn ayọ wọnyi wa lori taabu data (Ọjọ) ninu ẹgbẹ   be (ilana):

Ọna 3. Tọju awọn ori ila ti o samisi / awọn ọwọn pẹlu Makiro

Ọna yii jẹ boya julọ wapọ. Jẹ ki a ṣafikun laini ofo ati ọwọn ofo si ibẹrẹ ti dì wa ki o samisi pẹlu aami eyikeyi awọn ori ila ati awọn ọwọn ti a fẹ tọju:

Bayi jẹ ki a ṣii Olootu Ipilẹ Visual (ALT + F11), fi module tuntun ti o ṣofo sinu iwe wa (akojọ Fi sii - Module) ati daakọ ọrọ ti awọn macros meji ti o rọrun nibẹ:

Sub Ìbòmọlẹ() cell Dim Bi Range Application.ScreenUpdating = Eke 'Pa imudojuiwọn iboju kuro lati mu yara yara Fun sẹẹli kọọkan Ni ActiveSheet.UsedRange.Rows(1) .Awọn sẹẹli 'Yọ lori gbogbo awọn sẹẹli ni ọna akọkọ If cell.Value = "x " Nigbana ni cell .EntireColumn.Hidden = Otitọ 'ti o ba wa ni cell x - hide column Next For Kọọkan cell In ActiveSheet.UsedRange.Columns(1) .Ẹyin 'lọ nipasẹ gbogbo awọn sẹẹli ti iwe akọkọ If cell.Iye = "x" Lẹhinna cell.EntireRow.Hidden = Otitọ 'ti o ba wa ninu sẹẹli x - tọju ila naa Next Application.ScreenUpdating = Otitọ Ipari Sub Show() Columns.Hidden = Eke 'fagile gbogbo awọn ori ila ati awọn ọwọn Rows.Hidden = Ipari Ipari Ipari otitọ  

Bi o ti le gboju, Makiro tọju hides ati Makiro show - Ṣe afihan awọn ori ila ti o ni aami ẹhin ati awọn ọwọn. Ti o ba fẹ, Makiro le jẹ awọn bọtini hotkeys (F8 giga + ati bọtini sile), tabi ṣẹda awọn bọtini taara lori dì lati ṣe ifilọlẹ wọn lati taabu Olùgbéejáde - Fi sii - Bọtini (Olùgbéejáde - Fi sii - Bọtini).

Ọna 4. Tọju awọn ori ila / awọn ọwọn pẹlu awọ ti a fun

Jẹ ki a sọ pe ninu apẹẹrẹ ti o wa loke, a, ni ilodi si, fẹ lati tọju awọn lapapọ, ie eleyi ti ati awọn ori ila dudu ati awọn awọ-ofeefee ati awọ ewe. Lẹhinna Makiro wa ti tẹlẹ yoo ni lati yipada diẹ nipasẹ fifi kun, dipo ṣayẹwo wiwa “x”, ṣayẹwo fun ibaamu awọ kikun pẹlu awọn sẹẹli ti a yan laileto:

Sub HideByColor() cell Dim Bi Range Application.ScreenUpdating = Eke Fun alagbeka kọọkan Ni ActiveSheet.UsedRange.Rows(2).Cells If cell.Interior.Color = Range("F2").Interior.Awọ Lẹhinna cell.EntireColumn.Hidden = Otitọ Ti cell.Interior.Color = Range("K2").Interior.Awọ Lẹhinna cell.EntireColumn.Hidden = Otitọ Next Fun Kọọkan cell Ni ActiveSheet.UsedRange.Columns(2).Cells If cell.Interior.Color = Range ("D6").Interior.Awọ Lẹhinna cell.EntireRow.Hidden = True If cell.Interior.Color = Range("B11").Interior.Awọ Lẹhinna cell.EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub.  

Sibẹsibẹ, a ko gbọdọ gbagbe nipa ọkan caveat: Makiro yii ṣiṣẹ nikan ti awọn sẹẹli ti tabili orisun ti kun pẹlu awọ pẹlu ọwọ, ati pe ko lo ọna kika ipo (eyi jẹ aropin ti Inu ilohunsoke.Color ohun ini). Nitorinaa, fun apẹẹrẹ, ti o ba ṣe afihan gbogbo awọn iṣowo laifọwọyi ni tabili rẹ nibiti nọmba naa kere ju 10 ni lilo ọna kika ipo:

Nọmbafoonu/fifihan awọn ori ila ati awọn ọwọn ti ko wulo

... ati pe o fẹ lati tọju wọn ni išipopada kan, lẹhinna Makiro ti tẹlẹ yoo ni lati “pari”. Ti o ba ni Excel 2010-2013, lẹhinna o le jade ni lilo dipo ohun-ini naa Inu ilosoke ohun ini DisplayFormat.Interior, eyi ti o njade awọ ti sẹẹli, laibikita bawo ni a ṣe ṣeto rẹ. Makiro lati tọju awọn laini buluu le lẹhinna dabi eyi:

Sub HideByConditionalFormattingColor() cell Dim Bi Range Application.ScreenUpdating = Eke Fun alagbeka kọọkan Ninu ActiveSheet.UsedRange.Columns(1) .Cells If cell.DisplayFormat.Interior.Color = Range("G2").DisplayFormat.Interior.Awọ Lẹhinna cell .EntireRow.Hidden = Otitọ Ohun elo Next.ScreenUpdating = Opin Ipari Otitọ  

Cell G2 ti wa ni ya bi a ayẹwo fun awọ lafiwe. Laanu ohun ini Ọna kika han ni Excel nikan bẹrẹ lati ẹya 2010, nitorinaa ti o ba ni Excel 2007 tabi agbalagba, iwọ yoo ni lati wa pẹlu awọn ọna miiran.

  • Kini Makiro, nibo ni lati fi koodu macro sii, bi o ṣe le lo wọn
  • Iṣakojọpọ aifọwọyi ni awọn atokọ ọpọ ipele

 

Fi a Reply