Ei ole mikään salaisuus, että useimmat Excel-käyttäjät ajattelevat taulukoita luodessaan ennen kaikkea omaa mukavuuttaan ja mukavuuttaan. Näin syntyy kauniita, värikkäitä ja raskaita taulukoita, joissa on monimutkaisia ”otsikoita”, joita ei kuitenkaan voi suodattaa tai lajitella ollenkaan, eikä automaattista pivot-taulukon raporttia kannattaa ajatella ollenkaan.
Ennemmin tai myöhemmin tällaisen pöydän käyttäjä tulee siihen tulokseen, että "se ei ehkä ole niin kaunis, mutta se voi toimia" ja alkaa yksinkertaistaa pöytänsä suunnittelua saattamalla sen klassisten suositusten mukaiseksi:
- yksinkertainen yksirivinen otsikko, jossa jokaisella sarakkeella on oma yksilöllinen nimi (kentän nimi)
- yksi rivi – yksi valmis toiminto (kauppa, myynti, postitus, projekti jne.)
- ei yhdistettyjä soluja
- ilman taukoja tyhjien rivien ja sarakkeiden muodossa
Mutta jos teet yksirivisen otsikon monitasoisesta otsikosta tai jaat yhden sarakkeen useisiin, se on melko yksinkertaista, taulukon rekonstruointi voi viedä paljon aikaa (etenkin suurilla kooilla). Se tarkoittaa seuraavaa tilannetta:
| Of |  | do |  |
Tietokantojen kannalta oikeaa taulukkoa kutsutaan yleensä tasaiseksi (flat) – juuri tällaisten taulukoiden mukaan on parasta rakentaa pivot-taulukoiden (pivot-taulukoiden) raportteja ja tehdä analytiikkaa.
Voit muuntaa kaksiulotteisen pöydän tasaiseksi pöydäksi käyttämällä yksinkertaista makroa. Avaa Visual Basic Editor -välilehden kautta Kehittäjä – Visual Basic (Kehittäjä – Visual Basic Editor) tai pikanäppäimellä muut+F11. Lisää uusi moduuli (Insert – moduuli) ja kopioi tämän makron teksti sinne:
Sub Redesigner() Dim i As Long Dim hc As Integer, hr As Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = Screenating полсбопо) Väärä i = 1 Aseta inpdata = Valinta Joukko ns = Työarkit. Lisää kohtaan r = (hr + 1) Inpdata.Rows.Count:lle c = (hc + 1) To inpdata.Columns.Count For j = 1 To hc ns. Solut(i, j) = inpdata.Cells(r, j) Seuraava j For k = 1 To hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) Seuraava k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 Seuraava c Seuraava r End Sub Voit sitten sulkea VBA-editorin ja palata Exceliin. Nyt voimme valita alkuperäisen taulukon (kokonaan, otsikolla ja ensimmäisessä sarakkeessa kuukausilla) ja ajaa makromme läpi Kehittäjä – makrot (Kehittäjä – makrot) tai puristusyhdistelmä muut+F8.
Makro lisää kirjaan uuden arkin ja luo siihen uuden, rekonstruoidun version valitusta taulukosta. Voit työskennellä tällaisen taulukon kanssa "täysin" käyttämällä koko Excel-työkaluarsenaalia suurten luetteloiden käsittelyyn ja analysointiin.
- Mitä makrot ovat, mihin makrokoodi lisätään VBA:ssa, miten niitä käytetään
- Raporttien luominen pivot-taulukoilla
- Työkalu XNUMXD-taulukoiden uudelleensuunnitteluun litteiksi PLEX-lisäosasta