truc №47

Pașii pe care le puteți urma pentru a crea un pivottable, necesită aplicarea unor efort, iar aceste eforturi sunt de multe ori inutile. Scrierea un pic de cod VBA, puteți crea automat foi de calcul simple.

Tabele recapitulative - aceasta este o oportunitate foarte rezonabil și eficiente pe care le puteți aplica la datele stocate într-o listă sau tabel. Din păcate, simplul gând al procesului de creare a unui PivotTable suficient pentru utilizatorii abandonat ideea de a experimenta cu ei. Deși unele dintre tabele pivot setări pot fi destul de complexe, de cele mai multe tabele de sinteză pot fi create rapid și ușor. Cele două Cele mai frecvente întrebări despre Excel se referă la modul de a contoriza numărul de elemente din listă, și cum să creați o listă de elemente unice pe baza listei conține multe elemente duplicate. În acest articol vă vom arăta cum să creați rapid și ușor un pivottable care va îndeplini aceste sarcini.

coloana A este o Presupunem că listă lungă de nume, care este poziția în celula A1. Vrei să știi cât de multe elemente sunt cuprinse în listă, și de a crea o listă de elemente unice. celulă Evidențiați A1 (antet) și selectați Date → Rezumat Tabel (date → PivotTable și PivotChart Raport) (sau date Raport → pivottable pe un Mac), pentru a porni Expertul PivotTable.

Asigurați-vă că comutatorul este setat în listă sau baza de date Microsoft Excel (Lista Microsoft Excel sau baza de date) și a subliniat că o celulă de date. Acest lucru va permite Excel să recunoască automat datele pe baza cărora va continua să construiască tabelul de sinteză. Dacă executați Microsoft Windows. în tipul de grup de raport (Ce fel de raport doriți să creați?) Selectați pivottable (PivotTable) (pe Macintosh, această întrebare nu apare). Faceți clic pe Next (Înainte). PivotTable Wizard ar trebui să selecteze automat intervalul de date corecte în coloana A și selectați-l pe foaia. Dacă da, faceți clic pe Next (Următor). În caz contrar, selectați intervalul cu mouse-ul. Faceți clic pe Layout (Aspect), apoi trageți în zona de date (date), care va fi singura ta domeniu - peste acest domeniu, ar trebui să vedeți antetul celula A1. Încă o dată, trageți caseta cu titlul, de data aceasta în zona liniei (Row). Faceți clic pe butonul OK.

În această etapă, dacă este necesar, puteți face clic dublu în datele de câmp butonul (date) și modificați setarea operațiunii (rezum). Puteți selecta SUM (suma), medie (medie) și așa mai departe. D. În mod implicit, Excel selectează COUNT funcție (COUNT), în cazul în care lucrarea este cu text, și în funcție de suma (SUM), în cazul în care acest număr.

Acum, ca un raport PivotTable, selectați noua listă de locație (foaie de lucru) și faceți clic pe butonul Finish (Finalizare). Într-o nouă foaie de lucru, ar trebui să vedeți tabelul de sinteză care conține numele unic al listei sursă și o indicație de câte ori fiecare element (numele) este conținut în listă.

Și dacă doriți toți acești pași, în loc să rulați un macro pentru a crea un pivottable bazat pe oricare din coloana specificată? Dacă înregistrați doar un macro, acesta va funcționa numai în cazul în care datele conține același titlu. Pentru a evita acest lucru, puteți crea un macro simplu stocate în registrul de lucru sau într-o carte personală macro, care va crea o listă pivottable cu privire la orice produs. Pentru a face acest lucru, aveți nevoie pentru a scrie un cod general de VBA și introduceți-l într-un modul standard, în cartea dvs. personal macro sau orice alt macro carte.

// Listarea 4.1 Sub GetCount () Dim Pt Ca pivottable Dim strField ca șir de strField = Selection.Cells (1, 1) .Text Range (selecție, Selection.End (xlDown)). Name = "Articole" ActiveWorkbook.PivotCaches.Add (SourceType: = xlDatabase, _ SourceData: = "= Elemente") 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

Pentru a reveni la Excel, închide fereastra Script sau apăsați Alt / Apple a + Q, și apoi salvați registrul de lucru. Înainte de a rula acest cod, evidențiați antetul listei și asigurați-vă că lista nu conține celule goale.

Pentru a elimina rapid celulele goale, sortarea listei. (PivotTable Field) și layout (PivotTable Layout)

Codul va crea automat un interval numit pe baza listei și dea numele de articole. Apoi, el va crea un nou tabel pivot foaie de calcul bazat pe acest interval numit. Data viitoare, când aveți o listă lungă de date, puteți evidenția pur și simplu antetul și rulați macro. Lucrările la setarea tabel sumar se va face în cel mai scurt timp.