Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
1136to1140
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

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

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
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
@Christian
17.02.2010 16:43:26
Beate
Danke Christian,
ich werde Max darauf aufmerksam machen.
Gruß,
Beate
Anzeige
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
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
Anzeige
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

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige