Gefilterte Daten autom. in neues Tabellenblatt :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2003] Gefilterte Daten autom. in neues Tabellenblatt

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

Williander
Newbie
Newbie

Anmeldedatum: 29.11.2007
Beiträge: 46

Verfasst am: 13.03.2008, 16:16

Hallo liebe Excelgemeinde,

habe ein Problem. Und zwar habe ich eine grosse Datenmenge (von ca. 3.500 Zeilen und von Spalte A bis F). Diese Daten sollen nach bestimmten Kriterien gefiltert werden und diese gefilterte Daten in ein eigenes Tabellenblatt kopiert werden. z.B. Alle Datensätze (ein Datensatz entspricht einer Zeile) die mit PLZ 60... beginnen.
Kann ich das irgendwie automatisieren?
Und wenn ja, auch mit zwei oder mehreren Filtermerkmalen (z.B. PLZ 60... und Umsatz >2.500)?

Vielen, vielen Dank für Eure Antwort bereits im voraus.

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 13.03.2008, 16:27

Hallo!

Hast du mal in das Tutorial: Spezialfilter geschaut?
Und auch hier wird sowas behandelt.

_________________

Viele Grüße vom Schatzi
------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!

Williander
Newbie
Newbie

Anmeldedatum: 29.11.2007
Beiträge: 46

Verfasst am: 14.03.2008, 15:52

Hallo

danke für den Hinweis. Es hat mir teilweise weitergeholfen. Inzwischen habe ich anderweitig ein Makro gefunden und angepasst. Ich würde es gerne noch etwas ändern, weiß aber nicht wie (stehe noch am Beginn meiner Makro-Ausbildung... sozusagen).

Wie kann ich das Marko gestalten das die Daten in eine bereits vorhandene Mappe kopiert werden (also ein neues Tabellenblatt mit den Daten eingefügt wird)? Und kann das Tabellenblatt direkt mit dem gefilterten Wert (z.B. PLZ 10368) benannt werden?

Sub test()
Dim Blatt As Worksheet, Such$
Set Blatt = ActiveSheet
Such = InputBox("Welche PLZ?")
With Blatt
If Not .AutoFilterMode = True Then .Range("A1").AutoFilter
.Range("A1").AutoFilter Field:=1 Criteria1:=Such
.Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Copy
.AutoFilterMode = False
End With
Workbooks.Add
Range("A1").PasteSpecial xlPasteAll
ActiveWorkbook.SaveAs Filename:="C:\Eigene Dateien\2008\" & Such, FileFormat:=xlNormal
Application.CutCopyMode = False
End Sub

Nur interessehalber... wie kann ich bei der Eingabe in die Inputbox z.B. alle die mit der PLZ 1 anfangen rausfiltern?

Vielen Dank bereits im voraus.

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5729

Verfasst am: 14.03.2008, 16:10

Hallo!

Alles ungetestet:
Um alle PLZs mit 1 zu filtern, fällt mir momentan nix besseres ein, als "<20000" in die InputBox einzugeben.

Die bereits vorhandene Mappe musst du öffnen,
Workbooks.Open("C:\Excel\ziel.xls")
hier dann ein Blatt einfügen,
Sheets.Add
und diesem den Namen zuweisen.
ActiveSheet.Name = Such

PS: Ich würde es trotzdem mit dem Spaezialfilter machen, da dieser einfach flexibler ist, aber das ist deine Sache...

Williander
Newbie
Newbie

Anmeldedatum: 29.11.2007
Beiträge: 46

Verfasst am: 14.03.2008, 16:24

Danke Schatzi für die schnelle Rückmeldung,

werde ich nachher gleich mal ausprobieren.
Werde Deinen Tip mal aufnehmen und mir den "Spezialfilter" mal genau zu Gemüte führen.

Danke nochmal uns ein schönes WE.

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Excel 2003 / Daten von untereinander ...	herbert33	Microsoft Excel Hilfe	1	27.11.2008, 17:17
	Daten aus Spalten von Tabellenblatt 1...	leenie	Microsoft Excel Hilfe	3	14.11.2008, 10:52
	Daten aus html-Tabelle in Excel impor...	eis33	Microsoft Excel Hilfe	2	13.11.2008, 16:08
	Daten in andere Datei übernehmen	Harro	Microsoft Excel Hilfe	11	11.11.2008, 15:28
	Daten (Zahlen) ersetzen in zwei versc...	Bratwurst	Microsoft Excel Hilfe	4	11.11.2008, 11:41

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de