Mhuwiex sigriet li l-biċċa l-kbira ta 'l-utenti ta' Excel, meta joħolqu tabelli fuq folji, jaħsbu l-ewwelnett dwar il-kumdità u l-konvenjenza tagħhom stess. Dan huwa kif jitwieldu tabelli sbieħ, ikkuluriti u ingombranti b'"headers" kumplessi, li, fl-istess ħin, ma jistgħux jiġu ffiltrati jew magħżula xejn, u huwa aħjar li ma taħseb xejn dwar rapport awtomatiku b'tabella tal-pern.
Illum jew għada, l-utent ta 'tabella bħal din jasal għall-konklużjoni li "ma jistax ikun daqshekk sabiħ, iżda jista' jaħdem" u jibda jissimplifika d-disinn tat-tabella tiegħu, u jġibha konformi mar-rakkomandazzjonijiet klassiċi:
- header sempliċi b'linja waħda, fejn kull kolonna se jkollha l-isem uniku tagħha stess (isem il-qasam)
- linja waħda - operazzjoni waħda kompluta (ftehim, bejgħ, kollokament, proġett, eċċ.)
- ebda ċelluli magħquda
- mingħajr waqfiet fil-forma ta’ ringieli u kolonni vojta
Imma jekk tagħmel header ta 'linja waħda minn waħda b'ħafna livelli jew taqsam kolonna waħda f'diversi oħrajn, huwa pjuttost sempliċi, allura r-rikostruzzjoni tat-tabella tista' tieħu ħafna ħin (speċjalment f'daqsijiet kbar). Dan ifisser is-sitwazzjoni li ġejja:
Of | do |
F'termini ta 'databases, it-tabella t-tajba normalment tissejjaħ ċatta (ċatta) - huwa skont tabelli bħal dawn li l-aħjar huwa li jinbnew rapporti ta' tabelli pern (tabelli pivot) u twettaq analitiċi.
Tista 'tikkonverti tabella bidimensjonali għal tabella ċatta billi tuża makro sempliċi. Iftaħ l-Editur Visual Basic permezz tat-tab Żviluppatur – Visual Basic (Iżviluppatur — Editur Bażiku Viżwali) jew shortcut tat-tastiera Alt+F11. Daħħal modulu ġdid (Daħħal – Modulu) u kkopja t-test ta' din il-makro hemmhekk:
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("Сколько строк сверху?") Falza i = 1 Issettja inpdata = Sett tal-Għażla ns = Worksheets.Żid Għal r = (hr + 1) Għal inpdata.Rows.Count Għal c = (hc + 1) Biex inpdata.Columns.Count Għal j = 1 Biex hc ns. Cells(i, j) = inpdata.Cells(r, j) Li jmiss j Għal k = 1 Sa hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) Li jmiss k ns.Cells( i, j + k - 1) = inpdata.Ċelloli (r, c) i = i + 1 Li jmiss c Li jmiss r Tmiem Sub
Imbagħad tista 'tagħlaq l-editur VBA u terġa' lura għal Excel. Issa nistgħu nagħżlu t-tabella oriġinali (kompletament, b'header u l-ewwel kolonna bix-xhur) u nħaddmu l-makro tagħna permezz Żviluppatur - Makros (Żviluppatur — Makros) jew tagħfas kombinazzjoni Alt+F8.
Il-makro se daħħal folja ġdida fil-ktieb u toħloq verżjoni ġdida u rikostitwita tat-tabella magħżula fuqha. Tista 'taħdem ma' tabella bħal din "b'mod sħiħ", billi tuża l-armament kollu ta 'għodod Excel għall-ipproċessar u l-analiżi ta' listi kbar.
- X'inhuma macros, fejn daħħal il-kodiċi makro fil-VBA, kif tużahom
- Ħolqien ta 'Rapporti b'PivotTables
- Għodda biex tfassal mill-ġdid tabelli XNUMXD għal dawk ċatti mill-add-on PLEX