trükk №47

A lépések, amit követni, hogy hozzon létre egy kimutatást, igényli némi erőfeszítést, és ezek az erőfeszítések gyakran szükségtelen. Az írás egy kicsit VBA-kódot, akkor automatikusan az egyszerű táblázatokat.

Összefoglaló táblázatok - ez egy nagyon ésszerű és hatékony lehetőséget, amely akkor lehet alkalmazni, tárolt adatok egy listában vagy táblázatban. Sajnos, a puszta gondolat létrehozásának folyamatát egy Kimutatás elég felhasználók elhagyott az elképzelést, kísérletezni velük. Bár néhány beállítást pivot táblák is elég összetett, a legtöbb összefoglaló táblázatokat hozhatunk létre gyorsan és egyszerűen. A két leggyakrabban feltett kérdéseket Excel utalnak, hogyan kell számolni a tételek számát a listában, és hogyan lehet létrehozni egy listát egyedi tárgyak alapján a lista tartalmaz sok ismétlődő elemeket. Ebben a cikkben bemutatjuk, hogyan lehet gyorsan és egyszerűen létrehozhat egy kimutatást, amely elvégzi ezeket a feladatokat.

Tegyük oszlop egy hosszú névsort, amely megcélozza az A1 cella. Azt akarom tudni, hogy hány elem van listában szereplő, és hozzon létre egy listát egyedi darabok. Jelölje ki az A1 cellát (fejléc) és válassza a Data → Összefoglaló táblázat (Data → Kimutatás és kimutatásdiagram jelentés) (vagy a Data → kimutatás a Mac), hogy elindítsa a Kimutatás varázsló.

Ellenőrizze, hogy a kapcsoló be van állítva a listában, vagy a Microsoft Excel adatbázis (Microsoft Excel lista vagy adatbázis), és kiemelte, hogy egy adat cellában. Ez lehetővé teszi, hogy az Excel automatikusan felismeri az adatokat, amelyek alapján továbbra is épít az összesítő táblázatot. Ha fut Windows Microsoft. A csoport a jelentés típusa (Milyen jelentést akar létrehozni?) Válassza Kimutatás (Kimutatás) (Macintosh, ez a kérdés nem jelenik meg). Kattintson a Tovább (Next). Kimutatás varázsló automatikusan kiválasztja a megfelelő adatok körét az A oszlopban, és válassza ki a lapon. Ha igen, kattintson a Tovább gombra (Next). Ellenkező esetben válassza ki a tartományban az egérrel. Kattintson Layout (elrendezés), majd húzza a területen az adatok (Data), hogy lesz az egyetlen területen - ezt a területet, akkor lásd a fejléc az A1-es cellába. Ismét húzza a dobozt a címet, ezúttal a területen vonal (sor). Kattintson az OK gombra.

Ebben a szakaszban, ha szükséges, akkor kattintson duplán a gombra területén adatok (adatok) és módosítsa a beállítási művelet (Összefoglalás alapja). Kiválaszthatja a Sum (Sum), AVG (átlag), és így tovább. D. Alapértelmezés szerint az Excel kiválasztja a funkció COUNT (COUNT), ha a mű szöveg, és funkciója az összeg (SUM), ha ez a szám.

Most, egy kimutatást, válassza ki az új helyet lista (Új munkalap), majd kattintson a Befejezés (Finish) gombra. Új munkalapon, akkor lásd az alábbi összefoglaló táblázatot tartalmazó egyedi nevet a forrás listát, és azt jelzi, hogy hányszor minden eleme (név) szerepel a listán.

És ha azt szeretnénk ezeket a lépéseket a helyén fut egy makró segítségével egy kimutatást alapján meghatározott bármely oszlop? Ha csak rögzíteni a makró, akkor fog működni, ha az adatokat tartalmazza az azonos címet. Ennek elkerülése érdekében, akkor létrehozhat egy egyszerű makró tárolt munkafüzet vagy személyes makro könyvet, amely létrehoz egy kimutatást lista azokat az elemeket. Ehhez meg kell írni néhány általános VBA kódot, és adja meg azt a szabványos modul a személyes makró könyv vagy bármely más könyv makró.

// Listing 4.1 Sub GetCount () Dim Pt Amint Kimutatás Dim strField As String strField = Selection.Cells (1, 1) .text tartomány (Selection, Selection.End (xlDown)). Name = "elemek" ActiveWorkbook.PivotCaches.Add (SourceType: = xlDatabase, _ SourceData: = "= tételek") CreatePivotTable TableDestination :. = "", _ TableName: = "ItemList" Set Pt = ActiveSheet.PivotTables ( "ItemList") ActiveSheet.PivotTableWizard TableDestination: = Cells (3 1) Pt.AddFields RowFields: = strField Pt.PivotFields (strField) .Orientation = xlDataField End Sub

Ahhoz, hogy vissza az Excel, zárja be az ablakot Script vagy az Alt / Apple + Q, majd mentse a munkafüzetet. Futtatása előtt ezt a kódot, jelölje ki a lista feje és győződjön meg róla, hogy a lista nem tartalmazza az üres cellákat.

Ha gyorsan vegye ki az üres cellák, a lista rendezéséhez. (Kimutatás Field) és az elrendezés (Kimutatás elrendezés)

A kód automatikusan létrehoz egy névvel ellátott tartomány alapján a listát, és adja meg a nevét tételek. Aztán jön létre egy új táblázatot pivot tábla alapján a névvel ellátott tartomány. Legközelebb, ha van egy hosszú listát az adatok, akkor egyszerűen kiemelik a fejléc és futtatni a makrót. Minden munkát összefoglaló táblázatot kerül sor, nincs idő.