Kako skriti vmesne seštevke v vrtilni tabeli?
Ko v vrtilni tabeli dodate več kot eno polje oznakam vrstic ali stolpcev, bodo prikazani vmesni seštevki. Ste že kdaj poskušali odstraniti vmesne seštevke iz vrtilne tabele?
V eni vrtilni tabeli skrijete ali odstranite vmesne seštevke
Skrijte ali odstranite vmesne seštevke v vseh vrtilnih tabelah trenutnega delovnega lista
V eni vrtilni tabeli skrijete ali odstranite vmesne seštevke
Če želite odstraniti vmesne seštevke v eni vrtilni tabeli, obstaja enostaven način za vas, naredite naslednje:
1. Kliknite katero koli celico v vrtilni tabeli in nato kliknite Oblikovanje > Vmesne seštevke > Ne prikazuj vmesnih seštevkov, glej posnetek zaslona:
2. In vmesni seštevki v navedeni vrtilni tabeli so bili hkrati skriti, glejte posnetke zaslona:
 |
 |
 |
Skrijte ali odstranite vmesne seštevke v vseh vrtilnih tabelah trenutnega delovnega lista
Če je v vašem trenutnem delovnem listu več vrtilnih tabel in bo skritje medsebojnih seštevkov enega za drugim dolgočasno, vam lahko naslednja koda VBA pomaga odstraniti vmesne seštevke iz vseh vrtilnih tabel.
1. Držite tipko ALT + F11 in odpre tipko Okno Microsoft Visual Basic for Applications.
2. klik Vstavi > Moduliin prilepite naslednjo kodo v Okno modula.
Koda VBA: Odstranite vmesne seštevke v vseh vrtilnih tabelah trenutnega delovnega lista
Sub RemoveSubtotals()
'Update 20140905
Dim xPt As PivotTable
Dim xPf As PivotField
On Error Resume Next
For Each xPt In Application.ActiveSheet.PivotTables
For Each xPf In xPt.PivotFields
xPf.Subtotals(1) = True
xPf.Subtotals(1) = False
Next
Next
End Sub
3. Nato pritisnite F5 ključ za zagon te kode in vmesni seštevki v vseh vrtilnih tabelah aktivnega delovnega lista so bili hkrati odstranjeni.
Nasvet: Če želite znova prikazati medseštevke, lahko kliknete vrtilno tabelo in nato Oblikovanje > Pokažite vmesne seštevke na dnu skupine/ Pokaži vmesne seštevke na vrhu skupine.
Sorodni članki:
Kako v vrtilni tabeli prikazati več skupnih seštevkov?
Kako razvrstiti po vrstnem redu po meri v vrtilni tabeli?
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
