Πώς να εδραιωθεί Pivot Tables Χρησιμοποιώντας VBA

Η γλώσσα VBA για το Microsoft Excel σας επιτρέπει να δημιουργήσετε μονάδες που λειτουργούν σε εφαρμογές του Office . Μπορείτε να εδραιώσει συγκεντρωτικοί πίνακες σε Excel χρησιμοποιώντας τη διεπαφή για να επιλέξετε όλες τις πληροφορίες συγκεντρωτικού πίνακα και να αναδημιουργήσει το τραπέζι . Η νέα σειρά γίνεται ο πίνακας περιστροφής για φύλλο σας . Μπορείτε να εδραιώσει πίνακες στο ίδιο υπολογιστικό φύλλο ή σε διαφορετικά υπολογιστικά φύλλα . Οδηγίες
Η

1 Ανοίξτε το αρχείο Excel που θέλετε να επεξεργαστείτε . Κάντε κλικ στην καρτέλα "Προγραμματιστής " και κάντε κλικ στο κουμπί " VBA " . Εάν η καρτέλα Προγραμματιστής δεν εμφανίζεται , κάντε κλικ στην καρτέλα "Αρχείο" και κάντε κλικ στο " Επιλογές . " Κάντε κλικ στο κουμπί " Προσαρμογή της Κορδέλας " και επιλέξτε "Προγραμματιστής " στη λίστα των επιλογών της καρτέλας. Κάντε κλικ στο " OK " για να αποθηκεύσετε τις αλλαγές . Η καρτέλα Προγραμματιστής οθόνες, ώστε να μπορείτε να ανοίξετε το πρόγραμμα επεξεργασίας VBA . 2

Ορίστε το εύρος των δεδομένων που θέλετε να χρησιμοποιήσετε για να παγιώσει τα συγκεντρωτικοί πίνακες . Προσθέστε την ακόλουθη γραμμή κώδικα για να ορίσετε το εύρος για τη δημιουργία συγκεντρωτικού πίνακα :

Range ( Επιλογή , Selection.End ( xlDown ) ) Όνομα = " Data "
εικόνων 3 .

Δημιουργήστε τα δεδομένα του πίνακα περιστροφής του . Ο κώδικας που ακολουθεί προσθέτει δεδομένα από μια βάση δεδομένων στο αρχείο :

ActiveWorkbook.PivotCaches.Add ( SourceType : = xlDatabase , _SourceData : = " = Πελάτες " ) CreatePivotTable TableDestination : . = " " , _TableName : = " Πελάτες "

σε αυτό το παράδειγμα , έναν πίνακα βάσης δεδομένων που ονομάζεται " πελάτες " χρησιμοποιείται για τα δεδομένα του συγκεντρωτικού πίνακα .
Η 4

Προσθέστε τον νέο πίνακα που περιστρέφονται στο υπολογιστικό φύλλο . Ο κώδικας που ακολουθεί προσθέτει τον πίνακα στην τρίτη στήλη του υπολογιστικού φύλλου :

ActiveSheet.PivotTableWizard TableDestination : = Cells ( 3 , 0 )
Η
εικόνων