Se pa yon sekrè ke pifò itilizatè Excel yo, lè y ap kreye tab sou fèy papye, panse anvan tout bagay sou pwòp konfò ak konvenyans yo. Sa a se ki jan bèl, kolore ak ankonbran tab ak "tèt" konplèks yo fèt, ki, an menm tan an, pa ka filtre oswa klase nan tout, epi li pi bon pa panse sou yon rapò otomatik ak yon tab pivot ditou.
Pi bonè oswa pita, itilizatè a nan yon tab konsa rive nan konklizyon ke "li ka pa tèlman bèl, men li ka travay" epi li kòmanse senplifye konsepsyon tab la, pote l 'nan liy ak rekòmandasyon klasik yo:
- yon senp header yon sèl liy, kote chak kolòn pral gen pwòp non inik li (non jaden)
- yon liy - yon sèl operasyon fini (kontra, vann, afiche, pwojè, elatriye)
- pa gen selil fizyone
- san kraze nan fòm lan nan ranje vid ak kolòn
Men, si ou fè yon header yon sèl-liy soti nan yon sèl milti-nivo oswa divize yon kolòn nan plizyè, li se byen senp, Lè sa a, rekonstriksyon tab la ka pran anpil tan (sitou nan gwosè gwo). Sa vle di sitiyasyon sa a:
| Of |  | do |  |
An tèm de baz done, tab dwat la anjeneral rele plat (plat) - li se dapre tab sa yo ke li pi bon yo bati rapò sou tab pivot (tablo pivot) ak fè analiz.
Ou ka konvèti yon tab ki genyen de dimansyon nan yon tab plat lè l sèvi avèk yon makro senp. Louvri Editè Visual Basic atravè tab la Developer - Visual Basic (Devlopè — Editè debaz vizyèl) oswa rakoursi klavye Alt+F11. Mete yon nouvo modil (Mete – Modil) epi kopye tèks makro sa a la:
Sub Redesigner() Dim i As Long Dim hc As Integer, hr As Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько строк сверху?") Fo i = 1 Mete inpdata = Seleksyon Mete ns = Fèy travay.Ajoute Pou r = (hr + 1) Pou inpdata.Rows.Count Pou c = (hc + 1) Pou inpdata.Columns.Count Pou j = 1 Pou hc ns. Cells(i, j) = inpdata.Cells(r, j) Next j Pou k = 1 To hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) Next k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 Next c Next r End Sub Lè sa a, ou ka fèmen editè a VBA epi retounen nan Excel. Koulye a, nou ka chwazi tab orijinal la (konplètman, ak yon header ak premye kolòn nan ak mwa) epi kouri makro nou an atravè Devlopè - Macro (Devlopè — Macro) oswa peze konbinezon Alt+F8.
Makro a pral mete yon nouvo fèy nan liv la epi kreye yon nouvo vèsyon rekonstwi tab la chwazi sou li. Ou ka travay ak yon tab konsa "an plen", lè l sèvi avèk tout asenal zouti Excel pou trete ak analize gwo lis.
- Ki sa ki makro, ki kote yo mete kòd macro nan VBA, ki jan yo sèvi ak yo
- Kreye Rapò ak PivotTables
- Zouti pou reamenaje tab XNUMXD nan tab yo plat soti nan PLEX ajoute sou