Pole saladus, et enamik Exceli kasutajaid mõtleb lehtedel tabeleid luues ennekõike enda mugavusele ja mugavusele. Nii sünnivad ilusad, värvilised ja tülikad keerukate “päistega” tabelid, mida samas ei saa üldse filtreerida ega sorteerida ning automaatsele pivot tabeliga aruandele on parem üldse mitte mõelda.
Varem või hiljem jõuab sellise tabeli kasutaja järeldusele, et "see ei pruugi olla nii ilus, kuid see võib töötada" ja hakkab oma laua kujundust lihtsustama, viies selle kooskõlla klassikaliste soovitustega:
- lihtne üherealine päis, kus igal veerul on oma kordumatu nimi (välja nimi)
- üks rida – üks lõpetatud toiming (tehing, müük, postitamine, projekt jne)
- ühendatud lahtreid pole
- ilma pausideta tühjade ridade ja veergude kujul
Aga kui teete mitmetasandilisest päisest üherealise või jagate ühe veeru mitmeks, on see üsna lihtne, siis võib tabeli rekonstrueerimine võtta palju aega (eriti suurte suuruste puhul). See tähendab järgmist olukorda:
| Of |  | do |  |
Andmebaaside osas nimetatakse õiget tabelit tavaliselt flat (flat) – just selliste tabelite järgi on kõige parem koostada pivot-tabelite (pivot tabelite) aruandeid ja teha analüüsi.
Lihtsa makro abil saate teisendada kahemõõtmelise tabeli tasaseks lauaks. Avage vahekaardi kaudu Visual Basicu redaktor Arendaja – Visual Basic (Arendaja – Visual Basicu redaktor) või klaviatuuri otsetee muu+F11. Sisesta uus moodul (Sisesta – moodul) ja kopeerige selle makro tekst sinna:
Sub Redesigner() Dim i As Long Dim hc As Integer, hr As Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = Screenating полсбопо) Vale i = 1 Määra inpdata = valik Set ns = Worksheets.Add For r = (hr + 1) To inpdata.Rows.Count For c = (hc + 1) To inpdata.Columns.Count For j = 1 To hc ns. Cells(i, j) = inpdata.Cells(r, j) Järgmine j For k = 1 kuni hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) Järgmised k ns.Cells( i, j + k - 1) = sisendandmed. Cells(r, c) i = i + 1 Järgmine c Järgmine r End Sub Seejärel saate sulgeda VBA redaktori ja naasta Excelisse. Nüüd saame valida algse tabeli (täielikult koos päise ja esimese veeru kuudega) ja käivitada oma makro Arendaja – makrod (Arendaja – makrod) või vajutamise kombinatsioon muu+F8.
Makro lisab raamatusse uue lehe ja loob sellele valitud tabelist uue rekonstrueeritud versiooni. Sellise tabeliga saate töötada "täielikult", kasutades suurte loendite töötlemiseks ja analüüsimiseks kogu Exceli tööriistade arsenali.
- Mis on makrod, kuhu VBA-s makrokoodi sisestada, kuidas neid kasutada
- Aruannete loomine PivotTable-liigendtabelitega
- Tööriist XNUMXD tabelite ümberkujundamiseks lamedateks tabeliteks PLEXi lisandmoodulist