Aprire il file Excel che si desidera modificare . Fare clic sulla scheda "Sviluppatore " e cliccare sul pulsante " VBA " . Se la scheda Sviluppo non viene visualizzata , fare clic sulla scheda "File" e fare clic su " Opzioni ". Clicca su "Personalizza barra multifunzione " e selezionare "Sviluppatore " nell'elenco delle opzioni della scheda . Fare clic su " OK" per salvare le modifiche . Viene visualizzata la scheda Sviluppo , in modo da poter aprire l'editor VBA.
2
Impostare l'intervallo di dati che si desidera utilizzare per consolidare le tabelle pivot . Aggiungere la seguente riga di codice per impostare l'intervallo per la creazione della tabella pivot:
Range ( Selection , Selection.End ( xlDown ) ) Name = " Data"
3 .
Creare i dati della tabella pivot. Il codice seguente aggiunge dati da un database al file :
ActiveWorkbook.PivotCaches.Add . ( SourceType : = xlDatabase , _SourceData : = " = Clienti " ) TableDestination CreatePivotTable : = " " , _TableName : = "Clienti"
In questo esempio , una tabella di database denominato "Clienti" è utilizzato per i dati della tabella pivot .
4
Aggiungi la nuova tabella pivot per il foglio di calcolo . Il codice seguente aggiunge la tabella per la terza colonna del foglio di calcolo :
ActiveSheet.PivotTableWizard TableDestination : = Cells ( 3 , 0 ) per
Programmazione © www.354353.com