Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1136to1140
1136to1140
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

gefilterte Tabelle in neues Blatt kopieren

Forumthread: gefilterte Tabelle in neues Blatt kopieren

gefilterte Tabelle in neues Blatt kopieren
Joachim
Hallo,
ich filtere über den Autofilter eine Tabelle und möchte diese gefilterten Daten in ein neues Blatt kopieren.
Den Code für den Autofilter hab ich per Makro-Aufzeichnung erstellt. Doch beim Tabellenblatt/kopieren wird die ganze Tabelle kopiert.
Ist sicherlich nicht sehr aufwendig.
Gruss
Joachim
Anzeige
AW: gefilterte Tabelle in neues Blatt kopieren
17.02.2010 10:07:16
Beate
Hallo Joachim,
Guckst Du: Gefilterte Listen kopieren
Gruß,
Beate
AW: gefilterte Tabelle in neues Blatt kopieren
17.02.2010 11:13:39
Christian
Hallo Beate,
bei dem Code ist IMHO ein kleiner Fehler...
Wenn zB der Filter-Bereich in Spalte B beginnt und in Spalte B gefiltert wird dann wird auch Spalte A kopiert.
siehe Bsp. Hier zur Demo statt copy mit select - setze Haltepunkt bei .Range(.Range...
https://www.herber.de/bbs/user/68062.xls
viele Grüße
Christian
Anzeige
@Christian
17.02.2010 16:43:26
Beate
Danke Christian,
ich werde Max darauf aufmerksam machen.
Gruß,
Beate
AW: gefilterte Tabelle in neues Blatt kopieren
17.02.2010 10:07:39
Hajo_Zi
Hallo Joachim,
nach dem markieren Gehe zu, Inhalte, Sichbare

AW: gefilterte Tabelle in neues Blatt kopieren
17.02.2010 10:08:44
Ramses
Hallo
So geht das
Sub Copy_Filter_Range()
Dim chkRng As Range
'Datenbereich noch genau definieren
Set chkRng = Range("A1:D200")
chkRng.SpecialCells(xlCellTypeVisible).Copy Worksheets("Tabelle wo das hin soll").Cells(1, 1)
End Sub
gruss Rainer
Anzeige
AW: gefilterte Tabelle in neues Blatt kopieren
17.02.2010 10:23:57
Joachim
Hallo Rainer,
dein Code sehr kurz und knackig - genau richtig.
Da es die Zieltabelle noch nicht gibt, hab ich die vorher erstellt und kopiere nun die gefilterten Daten.
Danke.
Gruss
Joachim
AW: gefilterte Tabelle in neues Blatt kopieren
18.02.2010 19:55:50
Kuwe
Hallo Joachim,
bei mir geht auch sowas: 

Sub AF_Kopieren()
ActiveSheet.AutoFilter.Range.Copy Sheets("Tabelle2").Range("A1")
End Sub
Gruß Uwe
Anzeige

Forumthreads zu verwandten Themen

Werte in anderes Tabellenblatt übertragen
Bibo

Hallo liebe EXCEL-Freunde,
ich habe in der Online-Suche leider kein Makro gefunden, das ich mit meinen minimalen VBA-Kenntnissen hätte selbständig auf meine Problematik anpassen können und bitte Euch deshalb um Eure Hilfe.
In das Tabellenblatt "Kommission" der Beispielmappe, das als Har...
31.08.2008 17:54:00
Thread-ID: 1006231
4 Beiträge
Anzeige
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Gefilterte Zeilen/ Spalten Kopieren
Falk

Hallo zusammen,
folgendes Problem für mich:
Ich filtere den Bereich von A1:CD1000. Der Filter wird je nach Anforderung auf verschiedene Spalten gesetzt.
In den Zellen von Spalte A befindet sich eine Formel, die den Blattnamen anzeigt wenn in Spalte D und F etwas eingetragen ist anso...
11.11.2008 10:13:33
Thread-ID: 1023442
3 Beiträge
Anzeige
Daten in gefilterten Bereich Kopieren
Sebastian

Hallo Forum,
vielleicht kann mir jemand bei meinem Problem helfen. Google konnte es nicht. :(
Ich habe ein Tabellenblatt mit gefilterten Daten. Nun möchte ich von einem anderen Tabellenblatt Daten neben die gefilterten, noch sichtbaren Daten kopieren. Excel lässt das leider nicht zu.
03.02.2009 15:19:09
Thread-ID: 1046691
2 Beiträge
Anzeige
Zeilen mit ähnlichem Inhalt kopieren
Lauren

Hallo zusammen,
sitze wiedermal hier in VBA/Excel fest und hoffe auf Hilfe :)
Ich habe eine Excel Datei mit ca. 7000 Zeilen.........nun möchte ich die Inhalte etwas übersichtlicher gestalten aber händisch wäre das ja ein riiiiiiiiiesen Aufwand, daher bin ich auf der Suche nach einem Mak...
10.02.2009 14:31:49
Thread-ID: 1049097
4 Beiträge
Anzeige
String in gefilterter Liste kopieren
Werner

VBA-Level: befriedigend
Hallo Freunde,
in Spalte A eines Worksheet stehen einige tausend Strings. Mit dem Automatikfilter
filtert man eine Teilmenge davon heraus. Anschließend versucht man in dieser Spalte Strings
zusammenzulegen, und zwar so, dass jeweils der String in Spalte A...
08.04.2009 11:34:22
Thread-ID: 1067668
4 Beiträge
Mit VBA Zeilen in neue Register kopieren
Andreas

Ein Tabellenblatt soll nach einem bestimmten Kriterium durchsucht werden. Immer wenn das Suchkriterium gefunden wird, soll die Zeile kopiert und in ein neues Tabellenblatt eingefügt werden. Dies soll solange geschehen bis alle Zeilen durchsucht worden sind.
Im Detail soll dies wie folgt fun...
08.06.2009 12:29:49
Thread-ID: 1079883
3 Beiträge
gefilterten Bereich kopieren
Thomas

Moin moin,
habe in einem Blatt eine Filterung nach einem Kriterium in Spalte E.
Diese gefilterten Daten möchte ich nun --- und zwar mit Formeln --- in ein neues Tabellenblatt kopieren.
Problem: Im neuen Tabellenblatt wirft EXEL ab Spalte AB die Zeilen durcheinander bzw. nimmt diese...
12.06.2009 10:51:03
Thread-ID: 1080913
2 Beiträge
Zeilen in anderes Arbeitsblatt kopieren
Alex

Hallo @ all
ich habe folgendes Problem:
Tabelle 1 enthält eine Vielzahl von Daten. Diese will ich nun filtern und die jeweilige Zeile, die in N "TGA" enthält in Tabelle 2 kopieren.
Ich weiß, dass das Ganze mit wenn(summe... funktioniert, aber vermute, man muss hier feste Zahlen ange...
06.07.2009 11:29:58
Thread-ID: 1086570
7 Beiträge
VBA Zellbereich kopieren
Karin

Hallo Forum,
ich muss von einem Tabellenblatt bei bestimmten Bedingungen Zellbereiche in ein anderes Tabellenblatt kopieren. Eigentlich leicht, dachte ich ... In den XL-Beispielen habe ich auch ein wunderbares Makro gefunden, das per Doppelklick den gesamten Zellbereich in das zweite Tabell...
14.07.2009 19:08:09
Thread-ID: 1088630
10 Beiträge
Zeilen einfügen und kopieren
bug-i

Hallo, ich brauche eure Hilfe:
Folgende Beispietabelle:
Merkmal - Text
1 - Text1
3 - Text2
1 - Text3
1 - Text4
2 - Text5
1 - Text6
Ich möchte jetzt für jede Zeile, die ein Merkmal größer als 1 hat danach eine neue Zeile mit gleichem Inhalt einfügen.
Die T...
05.08.2009 10:11:39
Thread-ID: 1093668
2 Beiträge
Zeilen variabel oft kopieren und einfügen
Bernd

Hallo Forum,
ich tüftle seit einiger Zeit vergebens an folgender Aufgabe und bitte um eure Hilfe:
Ich habe in einer Mappe zwei Sheets: Tab1 und Tab2
In Tab1 importiere ich Daten mit Hilfe des Textkonvertierungsassistenten aus einer txt-Datei.
Die txt-Datei kann unterschiedlich v...
03.09.2009 17:41:35
Thread-ID: 1100389
9 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Gefilterte Tabelle in ein neues Blatt kopieren

Schritt-für-Schritt-Anleitung

Um gefilterte Daten in ein neues Tabellenblatt zu übertragen, kannst du ein einfaches VBA-Skript verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Füge den folgenden Code ein:

    Sub Copy_Filter_Range()
    Dim chkRng As Range
    ' Datenbereich noch genau definieren
    Set chkRng = Range("A1:D200")
    chkRng.SpecialCells(xlCellTypeVisible).Copy Worksheets("Tabelle wo das hin soll").Cells(1, 1)
End Sub

  4. Stelle sicher, dass der Zielarbeitsblattname in der Zeile Worksheets("Tabelle wo das hin soll") korrekt angegeben ist.

  5. Schließe den VBA-Editor und führe das Makro aus, indem du ALT + F8 drückst und dein Makro auswählst.

Mit diesem Skript werden die gefilterten Daten in das angegebene Tabellenblatt kopiert.

Häufige Fehler und Lösungen

  • Fehler: "Nur gefilterte Daten können in das aktive Blatt kopiert werden."

    • Lösung: Stelle sicher, dass du den richtigen Bereich mit SpecialCells(xlCellTypeVisible) angibst und dass der Autofilter aktiv ist.

  • Fehler: Das gesamte Tabellenblatt wird kopiert.

    • Lösung: Überprüfe deinen Code und stelle sicher, dass du nur den gefilterten Bereich kopierst, wie im obigen Beispiel gezeigt.

Alternative Methoden

Es gibt verschiedene Möglichkeiten, gefilterte Daten in ein neues Tabellenblatt zu übertragen:

  1. Copy-Paste Methode:

    • Markiere die gefilterten Daten, drücke CTRL + C, wechsle zu dem neuen Blatt und drücke CTRL + V.

  2. Automatisierung mit VBA:

    • Verwende den Code aus der Schritt-für-Schritt-Anleitung. Eine weitere Möglichkeit ist, die ActiveSheet.AutoFilter.Range.Copy Methode zu verwenden.
    Sub AF_Kopieren()
    ActiveSheet.AutoFilter.Range.Copy Sheets("Tabelle2").Range("A1")
End Sub

Praktische Beispiele

  • Beispiel 1: Du hast eine Tabelle mit Verkaufsdaten und möchtest nur die Verkäufe aus einem bestimmten Monat in ein neues Blatt kopieren. Setze einen Filter auf das Datum und nutze den VBA-Code, um die gefilterten Daten zu übertragen.

  • Beispiel 2: Wenn du eine gefilterte Liste von Kundenadressen in ein anderes Tabellenblatt kopieren möchtest, kannst du die oben beschriebenen Methoden anwenden, um die Daten effizient zu übertragen.

Tipps für Profis

  • Überlege, wie du deine VBA-Skripte optimieren kannst, indem du Parameter für den Datenbereich und das Zielblatt hinzufügst. Das macht deinen Code flexibler.

  • Nutze die Möglichkeit, gefilterte Daten automatisch in ein neues Tabellenblatt zu übertragen, indem du die Skripte in ein Arbeitsblatt-Ereignis integrierst, wie Workbook_Open.

  • Speichere deine gefilterte Tabelle regelmäßig, um sicherzustellen, dass du immer die aktuellsten Daten hast.

FAQ: Häufige Fragen

1. Frage
Wie kann ich gefilterte Daten in eine neue Tabelle einfügen?
Antwort: Du kannst den SpecialCells(xlCellTypeVisible) Befehl in VBA verwenden, um nur die sichtbaren (gefilterten) Zellen zu kopieren und in eine neue Tabelle einzufügen.

2. Frage
Kann ich gefilterte Daten automatisch in ein neues Tabellenblatt übertragen?
Antwort: Ja, du kannst ein VBA-Makro verwenden, um dies zu automatisieren. Verwende den oben genannten Code und passe ihn an deine Bedürfnisse an.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige