En pivottabell används för att summera data och används allmänt i kalkylprogram som Microsoft Excel . Visual Basic for Applications är ett 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 ta bort pivottabeller om du har en arbetsbok med en massa kalkylblad och du måste manuellt ta bort dem . I några få steg kan du skriva VBA- kod för att ta bort en pivottabell
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 ” Ctrl ”och ” A ”klickar du på ”Infoga ” -menyn och välj ” Pivottabell . ” Klicka på ” OK ”.
2 .
Markera rutorna bredvid ” kolumner ” och ”Data ”.
Välj ” Utvecklare ”-fliken , klicka på ”Visual Basic ”. Klicka på ” Infoga ” -menyn och välj ” Module ”.
3 .
Kopiera och klistra in koden nedanför på din nya modul för att ta bort pivottabellen du just har skapat .
Private Sub deletePivotTable ( )
Dim Ptbl Som pivottabell
Dim wrkSheet Som kalkylblad
för varje wrkSheet I ActiveWorkbook. Worksheets
For Each Ptbl I wrkSheet. PivotTables
Range ( ” A3 : B6 ” ) . Välj
Selection. Delete Shift :=xlToLeft
Range ( ” A1 ” ) Välj
Exit Sub
Nästa Ptbl
Nästa wrkSheet
End Sub