Kako izbrisati eno ali vse vrtilne tabele v Excelu?
Vrtilna tabela je zelo uporabna funkcija za ogled ali izračun podatkov v Excelu, zato lahko vrtilne tabele običajno vstavimo v delovni ali več delovnih listov. Toda ali veste, kako na delovnem listu ali v celotnem delovnem zvezku izbrisati eno ali vse vrtilne tabele?
Izbrišite eno vrtilno tabelo na delovnem listu
Z VBA izbrišite vse vrtilne tabele v celotnem delovnem zvezku
Izbrišite eno vrtilno tabelo na delovnem listu
V Excelu lahko eno vrtilno tabelo izbrišete na naslednji način:
1. Kliknite poročilo vrtilne tabele. Oglejte si posnetek zaslona:
2. Nato kliknite Možnost > Izberite > Celotna vrtilna tabela nato izberite vrtilno tabelo. Oglejte si posnetek zaslona:
Nasvet: če uporabljate Excel 2013, izberite celotno vrtilno tabelo s klikom na Analizirajte > Izberite > Celotna vrtilna tabela.
3. In pritisnite Brisanje na tipkovnici bo vrtilna tabela odstranjena.
Z VBA izbrišite vse vrtilne tabele v celotnem delovnem zvezku
Če imate v delovnem zvezku več vrtilnih tabel, jih brisanje enega za drugim zamudno. Zdaj jih lahko uporabite za odstranitev naenkrat.
1. Pritisnite Alt + F11 za prikaz Microsoft Visual Basic za aplikacije okno.
2. V oknu kliknite Vstavi > Moduli za prikaz novega okna modula, nato v okno modula kopirajte naslednjo kodo VBA.
VBA: Odstranite vse vrtilne tabele v celotnem delovnem zvezku.
Sub DeleteAllPivotTablesInWorkbook()
'Updateby20140618
Dim xWs As Worksheet
Dim xPT As PivotTable
For Each xWs In Application.ActiveWorkbook.Worksheets
For Each xPT In xWs.PivotTables
xWs.Range(xPT.TableRange2.Address).Delete Shift:=xlUp
Next
Next
End Sub
3. klik Run , nato se v celotnem delovnem zvezku odstranijo vse vrtilne tabele.Relativni članki:
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!