Kache/montre ranje ak kolòn ki pa nesesè yo

Fòmasyon pwoblèm nan

Sipoze nou gen yon tab konsa ke nou dwe "danse" ak chak jou:

 

To whom the table seems small – mentally multiply it twenty times by area, adding a couple more blocks and two dozen large cities. 

Travay la se retire tanporèman nan ekran yo ranje ak kolòn ki kounye a nesesè pou travay, sa vle di, 

  • kache detay pa mwa, kite sèlman trimès
  • kache total pa mwa ak trimès, kite sèlman total la pou mwatye yon ane
  • kache vil ki pa nesesè nan moman sa a (mwen travay nan Moskou - poukisa mwen ta dwe wè Saint Petersburg?), elatriye.

Nan lavi reyèl, gen yon lanmè nan egzanp tab sa yo.

Metòd 1: kache ranje ak kolòn

Metòd la, franchman, se primitif epi li pa trè pratik, men de mo yo ka di sou li. Nenpòt ranje oswa kolòn ki te deja chwazi sou yon fèy ka kache lè w klike sou kolòn oswa kolòn ranje a epi chwazi kòmandman an nan meni kontèks la. Kache (Kache):

 

Pou ekspozisyon ranvèse, chwazi ranje / kolòn adjasan epi, pa klike sou dwa, chwazi nan meni an, respektivman, montre (Degache).

Pwoblèm lan se ke ou gen fè fas ak chak kolòn ak ranje endividyèlman, ki se konvenyan.

Metòd 2. Gwoupman

Si w chwazi plizyè ranje oswa kolòn epi chwazi nan meni an Done - Gwoup ak Estrikti - Gwoup (Done — Gwoup ak Plan — Gwoup), Lè sa a, yo pral fèmen nan yon parantèz kare (groupe). Anplis, gwoup yo ka fè nich youn nan lòt (jiska 8 nivo nidifikasyon yo gen dwa):

Yon fason ki pi pratik ak pi vit se sèvi ak yon chemen kout klavye pou gwoupe ranje oswa kolòn pre-seleksyon. Alt+Maj+Flèch dwat, ak pou separe Alt+Maj+Flèch Goch, respektivman.

Metòd sa a pou kache done ki pa nesesè yo se pi plis pratik - ou ka swa klike sou bouton an ak "+"Oswa"-", oswa sou bouton ki gen yon nivo gwoupman nimerik nan kwen siperyè agòch nan fèy la - Lè sa a, tout gwoup nan nivo vle a pral tonbe oswa elaji nan yon fwa.

Se konsa, si tab ou a gen ranje rezime oswa kolòn ak fonksyon sòm selil vwazen yo, se sa ki, yon chans (pa 100% vre) ke Excel li pral kreye tout gwoup ki nesesè yo nan tab la ak yon sèl mouvman - nan meni an Done - Gwoup ak Estrikti - Kreye Estrikti (Done — Gwoup ak Deskripsyon — Kreye Deskripsyon). Malerezman, tankou yon fonksyon travay trè enprevizib epi pafwa fè istwa san sans sou tab konplèks. Men, ou ka eseye.

Nan Excel 2007 ak pi nouvo, tout jwa sa yo sou tab la Done (Dat) an gwoup   Estrikti (Deskripsyon):

Metòd 3. Kache ranje / kolòn ki make ak yon makro

Metòd sa a se petèt pi versatile. Ann ajoute yon ranje vid ak yon kolòn vid nan kòmansman fèy nou an epi make ak nenpòt icon ranje ak kolòn sa yo ke nou vle kache:

Koulye a, ann louvri Editè Visual Basic (ALT + F11), mete yon nouvo modil vid nan liv nou an (meni Mete – Modil) epi kopye tèks de makro senp la:

Sub Hide() Dim cell As Range Application.ScreenUpdating = Fo 'Enfim mizajou ekran an pou pi vit Pou Chak selil ki nan ActiveSheet.UsedRange.Rows(1).Cells' Itere sou tout selil nan premye ranje a Si cell.Value = "x " Lè sa a, selil .EntireColumn.Hidden = Vre 'si nan selil x - kache kolòn Next Pou Chak selil nan ActiveSheet.UsedRange.Columns(1).Cells' ale nan tout selil nan premye kolòn nan Si selil.Valè = "x" Lè sa a cell.EntireRow.Hidden = Vrè 'si nan selil x - kache ranje Next Application.ScreenUpdating = Vrè Fen Sub Sub Show() Columns.Hidden = Fo 'anile tout ranje ak kolòn kache Rows.Hidden = Fo Fen Sub  

Kòm ou ta ka devine, macro la Kache kache ak makro a Montre – Montre dèyè ranje ak kolòn ki make. Si ou vle, yo ka bay makro yo rakoursi (Alt + F8 ak bouton paramèt), oswa kreye bouton dirèkteman sou fèy la pou lanse yo nan tab la Developer - Mete - Bouton (Devlopè - Mete - Bouton).

Metòd 4. Kache ranje/kolòn ak yon koulè bay yo

Ann di ke nan egzanp ki anwo a, nou, okontrè, vle kache total yo, sa vle di ranje koulè wouj violèt ak nwa ak kolòn jòn ak vèt. Lè sa a, macro anvan nou an pral gen yon ti kras modifye lè w ajoute, olye pou yo tcheke pou prezans "x", yon chèk pou matche koulè ranpli a ak echantiyon selil owaza chwazi:

Sub HideByColor() Dim selil kòm Range Application.ScreenUpdating = Fo Pou Chak selil nan ActiveSheet.UsedRange.Rows(2).Cells Si cell.Interior.Color = Range("F2").Interior.Color Lè sa a, cell.EntireColumn.Hidden = Vre Si cell.Interior.Color = Range("K2").Interior.Color Lè sa a, cell.EntireColumn.Hidden = Vrè Next Pou chak selil nan ActiveSheet.UsedRange.Columns(2).Cells If cell.Interior.Color = Range ("D6").Interior.Color Lè sa a, cell.EntireRow.Hidden = Vrè Si cell.Interior.Color = Range("B11").Interior.Color Lè sa a, cell.EntireRow.Hidden = Vrè Next Application.ScreenUpdating = True End Sub  

Sepandan, nou pa dwe bliye sou yon opozisyon: makro sa a ap travay sèlman si selil yo nan tablo sous la te ranpli ak koulè manyèlman, epi yo pa itilize fòma kondisyonèl (sa a se yon limit nan pwopriyete a Interior.Color). Se konsa, pou egzanp, si ou otomatikman make tout kontra nan tablo ou kote nimewo a se mwens pase 10 lè l sèvi avèk fòma kondisyonèl:

Kache/montre ranje ak kolòn ki pa nesesè yo

… epi ou vle kache yo nan yon sèl mouvman, Lè sa a, macro anvan an ap gen yo dwe "fini". Si ou gen Excel 2010-2013, Lè sa a, ou ka soti lè l sèvi avèk olye pou yo pwopriyete a Enteryè pwopriyete DisplayFormat.Interior, ki bay koulè selil la, kèlkeswa jan li te mete. Makro pou kache liy ble yo ta ka sanble konsa:

Sub HideByConditionalFormattingColor() Dim selil kòm Range Application.ScreenUpdating = Fo Pou chak selil nan ActiveSheet.UsedRange.Columns(1).Cells Si cell.DisplayFormat.Interior.Color = Range("G2").DisplayFormat.Interior.Color Lè sa a, selil .EntireRow.Hidden = Vrè Next Application.ScreenUpdating = Vrè Sub End  

Yo pran selil G2 kòm yon echantiyon pou konparezon koulè. Malerezman pwopriyete a DisplayFormat parèt nan Excel sèlman kòmanse nan vèsyon an 2010, kidonk si ou gen Excel 2007 oswa plis, w ap gen vini ak lòt fason.

  • Ki sa ki se yon macro, ki kote yo mete kòd macro, ki jan yo sèvi ak yo
  • Gwoup otomatik nan lis plizyè nivo

 

Kite yon Reply