Πώς να αλλάξετε ένα Συγκεντρωτικό Πίνακα Φίλτρο σε VBA

Ο συγκεντρωτικός πίνακας Excel είναι ένα ισχυρό εργαλείο λύσεις . Ένα κύριο χαρακτηριστικό ενός πίνακα περιστροφής είναι η ικανότητά του να φιλτράρει τα δεδομένα . Αυτό επιτρέπει στο χρήστη να περιορίσει την ποσότητα των δεδομένων που έχει να περιηγηθείτε για να πάρει την απάντησή του . Με μόλις ένα μικρό κομμάτι της Visual Basic for Applications ή VBA , τον προγραμματισμό , ο χρήστης μπορεί να χτίσει τη λειτουργικότητα που αλλάζει αυτόματα το φίλτρο συγκεντρωτικού πίνακα είτε σε απάντηση σε μια ενημερωμένη έκδοση ή ως μέρος μιας τυποποιημένης διαδικασίας . Οδηγίες
Η 1

Δημιουργία ενός πίνακα δεδομένων στο Excel . Στη γραμμή 1 , στήλη Α , πληκτρολογήστε τη λέξη « χρώμα ». Στη γραμμή 1 , στήλη Β , πληκτρολογήστε τη λέξη "Γράμμα ". Στη γραμμή 1 , στήλη Γ , πληκτρολογήστε τη λέξη " αριθμός ". Για πολλές σειρές στη στήλη A , πληκτρολογήστε σε διάφορα χρώματα , όπως το κόκκινο ή το πράσινο . Για στήλες Β και Γ, με τυχαία γράμματα και αριθμούς για να δημιουργήσετε τον πίνακα δεδομένων . 2

Τοποθετήστε ένα συγκεντρωτικό πίνακα με βάση τα δεδομένα . Φίλτρο στη στήλη Color απενεργοποιώντας " Πράσινη ".
Εικόνων 3

Ανοίξτε το πρόγραμμα επεξεργασίας της Visual Basic . Κάνετε αυτό πατώντας το πλήκτρο " ALT " + " F11 " ή επιλέγοντας " Εργαλεία" από το επάνω μενού , στη συνέχεια, επιλέξτε " Μακροεντολές " - " . Visual Basic Editor" >
Η

4 Κάντε κλικ στο "Εισαγωγή "στην επάνω γραμμή μενού και επιλέξτε" Ενότητα "επιλογή
5

Πληκτρολογήστε τον ακόλουθο κώδικα της Visual Basic : .

Public Sub FilterPivotTable ( )

Με ActiveSheet . Συγκεντρωτικοί πίνακες ( « PivotTable1 " ) . PivotFields ( «Χρώμα» )

. PivotItems ( «Πράσινη » ) . Visible = True

End With

End Sub

6

τρέξει με τον κωδικό πατώντας το πλήκτρο " F5 " ή με τα πόδια μέσα από τον κώδικα γραμμή- γραμμή, πατώντας "F8 ". Ο συγκεντρωτικός πίνακας θα δείξει τόσο το κόκκινο και πράσινο στήλες . Για να απενεργοποιήσετε το φίλτρο , αλλάξτε τη λέξη "True " σε " False ".
Η
εικόνων