Nwlapcug.com


Come eliminare una tabella Pivot in VBA

Come eliminare una tabella Pivot in VBA


Una tabella pivot viene utilizzata per riepilogare i dati ed è comunemente usata in programmi di foglio di calcolo come Microsoft Excel. Applicazioni di Visual Basic è un linguaggio di programmazione sviluppato da Microsoft e utilizzato per automatizzare operazioni di routine nelle applicazioni di Microsoft Office. Potrebbe essere necessario scrivere codice VBA per eliminare tabelle pivot se si dispone di una cartella di lavoro con un sacco di fogli di lavoro e devi eliminarli manualmente. In pochi passi è possibile scrivere codice VBA per eliminare una tabella pivot.

Istruzioni

1

Avviare Microsoft Office Excel e digitare "Colonne" in "A1", "Dati" in "B1", "Campo" in "A2", "12" in "B2", "Campo2" in "A3" e "13" a "B3".

Fare clic su "A1", premere "Ctrl" e "A", fare clic sul menu "Inserisci" e selezionare "PivotTable." Fare clic su "OK".

2

Seleziona le caselle accanto a "Colonne" e "Dati".

Selezionare la scheda "Sviluppo", quindi fare clic su "Visual Basic". Fare clic sul menu "Inserisci" e selezionare "Modulo".

3

Copiare e incollare il codice riportato di seguito il nuovo modulo per eliminare la tabella pivot che avete appena creato.

Private Sub deletePivotTable()

Dim Ptbl As PivotTable

Dim wrkSheet As Worksheet

For Each wrkSheet In ActiveWorkbook.Worksheets

For Each Ptbl In wrkSheet.PivotTables

Range("A3:B6").Select

Selection.Delete Shift:=xlToLeft

Range("A1").Select

Exit Sub

Next Ptbl

Next wrkSheet

End Sub