En pivot tabell används för att summera data och används ofta i kalkylprogram som Microsoft Excel . Visual Basic for Applications är en dator programmeringsspråk som har utvecklats av Microsoft och används för att automatisera rutinuppgifter i Microsoft Office-program . Du kan behöva skriva VBA-kod för att radera pivottabeller om du har en arbetsbok med många kalkylblad och du måste manuellt ta bort dem . I några steg du kan skriva VBA-kod för att ta bort en pivottabell . Instruktioner
1
Starta Microsoft Office Excel och skriv " Kolumner " i "A1" , " Data " i " B1 " , " Fält" i " A2 " , " 12 " i " B2 " , " fält2 " i " A3 " och " 13 " i " B3 " .
Klicka på" A1 " , tryck på " Ctrl " och " A ", klicka på " Infoga " -menyn och välj " pivottabellen . " Klicka på " OK . "
2
Markera rutorna bredvid " kolumner " och " Data ".
Välj " Utvecklare " fliken , klicka sedan på " Visual Basic . " Klicka på " Infoga " -menyn och välj " Modul . " Addera 3
Kopiera och klistra in koden nedan i din nya modulen för att ta bort pivot tabellen du just har skapat .
Private Sub deletePivotTable ( ) katalog
Dim Ptbl Som pivottabell
Dim wrkSheet Som Arbetsblad
För varje wrkSheet I ActiveWorkbook.Worksheets
För varje Ptbl I wrkSheet . pivottabeller
Range ( " A3 : B6 " ) . Välj
Shift
Selection.Delete : . = xlToLeft
Range ( " A1 " ) Välj
Exit Sub
Nästa Ptbl
Nästa wrkSheet
End Sub
