Nem titok, hogy a legtöbb Excel-felhasználó, amikor táblázatokat készít lapokon, mindenekelőtt saját kényelmére és kényelmére gondol. Így születnek szép, színes és nehézkes, összetett „fejlécekkel” ellátott táblák, melyeket ugyanakkor egyáltalán nem lehet szűrni, rendezni, és jobb, ha egyáltalán nem gondolunk egy pivot táblás automatikus jelentésre.
Előbb-utóbb egy ilyen asztal használója arra a következtetésre jut, hogy „lehet, hogy nem olyan szép, de működhet”, és elkezdi egyszerűsíteni asztala kialakítását, összhangba hozva azt a klasszikus ajánlásokkal:
- egy egyszerű egysoros fejléc, ahol minden oszlopnak saját egyedi neve lesz (mezőnév)
- egy sor – egy befejezett művelet (ügylet, eladás, feladás, projekt stb.)
- nincsenek egyesített cellák
- törés nélkül üres sorok és oszlopok formájában
De ha egysoros fejlécet készítünk egy többszintűből, vagy egy oszlopot többre osztunk, akkor az meglehetősen egyszerű, akkor a táblázat rekonstrukciója sok időt vehet igénybe (főleg nagy méreteknél). Ez a következő helyzetet jelenti:
| Of |  | do |  |
Ami az adatbázisokat illeti, a megfelelő táblát általában laposnak (flat) nevezik – ezek alapján a legjobb a pivot táblák (pivot táblák) jelentéseit készíteni és elemzéseket végezni.
Egy kétdimenziós asztalt egy egyszerű makró segítségével lapos asztallá alakíthat. Nyissa meg a Visual Basic Editort a lapon keresztül Fejlesztő – Visual Basic (Fejlesztő – Visual Basic szerkesztő) vagy billentyűparancsot más+F11. Helyezzen be egy új modult (Beszúrás – Modul), és másolja oda ennek a makrónak a szövegét:
Sub Redesigner() Dim i As Long Dim hc As Integer, hr As Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = Screenating полдоpо) Hamis i = 1 Set inpdata = Selection 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) Következő j For k = 1 To hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) Következő k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 Következő c Következő r Vége Al Ezután bezárhatja a VBA-szerkesztőt, és visszatérhet az Excelhez. Most kiválaszthatjuk az eredeti táblázatot (teljesen, fejléccel és az első oszlopban hónapokkal), és végigfuttathatjuk a makrónkat. Fejlesztő – Makrók (Fejlesztő – Makrók) vagy préselési kombináció más+F8.
A makró egy új lapot szúr be a könyvbe, és létrehozza rajta a kiválasztott táblázat új, rekonstruált változatát. Egy ilyen táblázattal „teljesen” dolgozhat, felhasználva az Excel-eszközök teljes arzenálját a nagy listák feldolgozásához és elemzéséhez.
- Mik azok a makrók, hova kell beszúrni a makrókódot a VBA-ban, hogyan kell használni őket
- Jelentések készítése kimutatások segítségével
- Eszköz az XNUMXD táblák laposra tervezéséhez a PLEX kiegészítőből