Wie wende ich denselben Filter auf mehrere Blätter in Excel an?
Es mag für uns einfach sein, die Filterfunktion zum Filtern von Daten in einem Arbeitsblatt anzuwenden, aber manchmal müssen Sie möglicherweise über mehrere Arbeitsblätter filtern, die eine gemeinsame Datenformatierung mit denselben Filterkriterien aufweisen. Das Filtern nacheinander wird viel Zeit verschwenden. Hier kann ich einen einfachen Weg vorstellen, um es sofort zu lösen.
Wenden Sie denselben Filter auf mehrere Arbeitsblätter mit VBA-Code an
Wenden Sie denselben Filter auf mehrere Arbeitsblätter mit VBA-Code an
Zum Beispiel habe ich vier Arbeitsblätter, da der folgende Screenshot nach denselben Kriterien gefiltert werden muss wie das Produkt = KTE auf einmal.
Es gibt keine direkte Möglichkeit, Daten in mehreren Arbeitsblättern in Excel zu filtern. Der folgende VBA-Code kann Ihnen jedoch dabei helfen, diesen Auftrag abzuschließen. Gehen Sie dazu wie folgt vor:
1. Halten Sie die Taste gedrückt ALT + F11 Tasten, dann öffnet es die Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Wenden Sie denselben Filter auf mehrere Arbeitsblätter an:
Sub apply_autofilter_across_worksheets()
'Updateby Extendoffice
Dim xWs As Worksheet
On Error Resume Next
For Each xWs In Worksheets
xWs.Range("A1").AutoFilter 1, "=KTE"
Next
End Sub
3. Und dann drücken F5 Schlüssel zum Ausführen dieses Codes, alle Produkte von KTE wurden in allen Arbeitsblättern gleichzeitig gefiltert, siehe Screenshot:
Hinweis: Innerhalb des obigen Codes in diesem xWs.Range ("A1"). AutoFilter 1, "= KTE" Skript, A1 und = KTE Gibt die Spalte und die Kriterien an, nach denen Sie filtern möchten. Die Nummer 1 ist die Spaltennummer, nach der Sie gefiltert haben. Sie können sie nach Bedarf ändern. Wenn Sie beispielsweise die Reihenfolge größer als 50 filtern möchten, müssen Sie dieses Skript nur folgendermaßen ändern: xWs.Range ("B1"). AutoFilter 2, "> 50".
|
Filtern Sie Daten nach mehreren Kriterien oder anderen spezifischen Bedingungen, z. B. nach Textlänge, Groß- und Kleinschreibung usw.
Kutools for Excel Superfilter Die Funktion ist ein leistungsstarkes Dienstprogramm. Sie können diese Funktion anwenden, um die folgenden Vorgänge abzuschließen:
Kutools for Excel: Mit mehr als 300 praktischen Excel-Add-Ins können Sie es innerhalb von 30 Tagen ohne Einschränkung testen. Jetzt herunterladen und kostenlos testen! |
Die besten Tools für die Office-Produktivität
Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%
- Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
- Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
- Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
- Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
- Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
- Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
- Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
- Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
- Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
