A pivot tabel anvendes til at opsummere data, og er almindeligt anvendt i regnearksprogrammer som Microsoft Excel. Visual Basic for Applications er en computer programmeringssprog udviklet af Microsoft og bruges til at automatisere rutineopgaver i Microsoft Office-programmer . Du kan være nødt til at skrive VBA-kode til at slette pivottabeller , hvis du har en projektmappe med en masse af regneark , og du nødt til manuelt at slette dem. I et par trin, du kan skrive VBA-kode til at slette en pivottabel . Instruktioner
1
Start Microsoft Office Excel og skriv " Kolonner " i "A1" , "Data " i " B1 ", " Field " i " A2 ", " 12 " i " B2 ", " Felt2 "i" A3 "og" 13 "i" B3 " .
Klik på" A1 " , tryk på" Ctrl " og" A ", klik på " Indsæt " menuen og vælge" pivottabel ". Klik på "OK".
2
Marker felterne ud for "Kolonner " og "Data ".
Vælg " Udvikler " fanen, og klik derefter på "Visual Basic ". Klik på " Indsæt" menuen og vælg " Modul ".
3
Kopier og indsæt koden nedenfor ind i din nye modul til at slette pivottabellen du netop har oprettet .
< P > Private Sub deletePivotTable ()
Dim Ptbl Som pivottabel
Dim wrkSheet Som Regneark
For Each wrkSheet I ActiveWorkbook.Worksheets
For Each Ptbl In wrkSheet . pivottabeller
Range (" A3 : B6 "). Vælg
Selection.Delete Shift: . = xlToLeft
Range (" A1" ) Vælg
< p > Exit Sub
Næste Ptbl
Næste wrkSheet
End Sub