Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 08:56:18
Textbox in Tabellenblatt ohne Bestätigung in Zelle eintragen
20.04.2024 07:57:54
Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1656to1660
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1656to1660
1656to1660
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

gefilterte Zeilen in neue Excel-Datei kopieren

gefilterte Zeilen in neue Excel-Datei kopieren
23.11.2018 23:23:09
Oli
Hallo zusammen,
ich beschäftige mich seit paar Wochen mit den nützlichen Funktionen von VBA in Excel. Die Grundlagen habe ich mir durch viel lesen bereits erarbeitet.
An einer Aufgabe scheitere ich jedoch kläglich. Ich habe eine Exceltabelle mit Filterfunktion. Darin sind in Spalte B verschiedene Straßennamen genannt.
Nun sollen alle verschiedenen Straßen (inkl. deren dazugehörigen Zellen A,C,D,E) automatisch in eine neue Exceltabelle kopiert werden (inkl. Formatierungen). Idealerweise hat die neue Datei den Namen des Straßennamen.
Hab schon viele Tage gegoogelt, aber nichts wirklich passendes gefunden?
Ist das in VBA überhaupt möglich (ich denke schon, oder)?
Über eure Ideen/Fragen etc. freue ich mich.
Grüße Oli

16
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: gefilterte Zeilen in neue Excel-Datei kopieren
24.11.2018 00:00:24
Oli
Ich habe nun folgende Grundlage gefunden:

Sub Speichern_unter()
'Dateiname wird aus Zelleninhalt generiert und abgespeichert in neuer Datei
Dim Verzeichnis As String
Dim Datei As String
Dim SaveDummy As Variant
Verzeichnis = "C:\Users\Oli\Desktop\"
Datei = "Mieterliste_" & Range("B2") & ".xls"
SaveDummy = SpeichernUnter(Verzeichnis & Datei)
If SaveDummy  False Then ActiveWorkbook.SaveAs SaveDummy 'Es wurde im Dialog auf Speichern  _
gedrückt
End Sub


Function SpeichernUnter(VorgabeName As String) As Variant
SpeichernUnter = Application.GetSaveAsFilename(InitialFileName:=VorgabeName, Filefilter:="Excel  _
Dateien (*.xls),*.xls*", _
FilterIndex:=1, Title:="Speichern unter...", ButtonText:="speichern")
End Function
Zwei Punkte, die jedoch noch nicht in dem Code stimme:
- es wird immer der Zelleninhalt aus B2 genommen. Wenn ich aber die Straßen filter, könnte die Zelle auch B78 heißen.
- Die Daten werden eins zu eins kopiert, nicht nur die gefilterten Daten. Es sollen aber nur die gefilterten Daten kopiert werden.
Vielleicht kann mir jemand helfen :)
Vielen Dank
Oli
Anzeige
AW: gefilterte Zeilen in neue Excel-Datei kopieren
24.11.2018 07:55:13
Hajo_Zi
Hallo Oli,
benutze den Makrorecorder und kopiere den sichtbaren Bereich, Start, Bearbeiten, Auswählen, Inhalte

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Die Beiträge werden auch ignoriert, es erfolgt keine Antwort.
AW: gefilterte Zeilen in neue Excel-Datei kopieren
24.11.2018 18:36:33
Oli
Wenn ich den Recorder benutzte, dann klappt das zwar, aber eben nur mit einem Filterergebis (z.B. Amalienstraße). Ich möchte aber alle Straßennamen (ca. 50 verschiedene) in 50 einzelne Dateien kopieren.
AW: Nachfrage
24.11.2018 08:54:53
Gerd
Hallo Oli,
möchtest du nur jeweils A:E der ersten Filterzeile oder des ganzen sichtbaren Filterbereichs kopieren?
Mit oder ohne Überschriften?
Gruß Gerd
Anzeige
AW: Nachfrage
24.11.2018 09:05:08
Hajo_Zi
Halo Gerd,
lasse den Fragesteller entscheiden ob offen.
Es ist heute nicht mehr üblich eine Rückmeldung zu geben und so ist der Beitrag über 6 Tage offen.
Gruß Hajo
AW: Nachfrage
24.11.2018 14:15:18
Gerd
Hallo Hajo!
Das war meine Entscheidung, die du nicht revidieren musst!
Gruß Gerd
AW: gefilterte Zeilen in neue Excel-Datei kopieren
24.11.2018 14:17:40
Gerd
.
AW: gefilterte Zeilen in neue Excel-Datei kopieren
24.11.2018 14:35:50
Hajo_Zi
AW: operandi ignoranti
24.11.2018 14:57:32
Gerd
.
AW: gefilterte Zeilen in neue Excel-Datei kopieren
24.11.2018 14:58:26
Gerd
.
AW: gefilterte Zeilen in neue Excel-Datei kopieren
24.11.2018 15:03:55
Hajo_Zi
wir können das noch ewig machen.
Gruß Hajo
AW: Wenn ich dir vom Administrator
24.11.2018 15:13:37
Gerd
diese Funktion sperren lasse, kannst du nicht mehr so weitermachen.
Alternativ kannst du mich ruhig in "deine Signatur-Plaktierung" aufnehmen.
Anzeige
AW: Wenn ich dir vom Administrator
24.11.2018 15:22:03
Hajo_Zi
Wie kindisch! oW
24.11.2018 20:52:50
Luc:-?
:-?
AW: Wenn ich dir vom Administrator
25.11.2018 08:12:42
Hajo_Zi
AW: Wenn ich dir vom Administrator
28.11.2018 09:52:01
robert

315 Forumthreads zu ähnlichen Themen

Zeilen mit Makro aus Mustertabelle kopieren
obelix-xxl

Hallo,
ich wende mich an dieses Forum mit der Bitte eine Makrolösung aufzuzeigen.
Udo hat mir gestern eine Lösung zum Kopieren von Zeilen hier ins Forum gestellt. Diese ist auch so genau richtig.
Nachdem ich diese nun einsetzen kann, benötige ich eine weiteres Kopiermakro.
In me...
26.09.2008 16:29:07
Thread-ID: 1012698
10 Beiträge
Anzeige
Word nach Excel kopieren mit Zeilenumbruch/Absatz
Christian

Hi Leute,
hab jetzt mal rumgesucht im Archiv, aber leider nichts gefunden.
Habe ein Word-File, das ich jetzt nach Excel übertragen will.
Ich kopiere hierfür Zeile für Zeile, was auch wunderbar funktioniert.
Was ist jedoch, wenn ich in der Word-Tabelle einen Zeilenumbruch habe?
04.11.2008 07:42:00
Thread-ID: 1021456
5 Beiträge
Zellenwert nicht kopieren
HannaG

Hallo,
mir fällt nicht ein, wie ich die Überschrift am Besten formulieren könnte. Besser ich erkläre das Problem:
Ich habe den Code in Zeile10 z.b.
=WENN(UND(A7>8.98;A7 Jetzt will ich den Code in die Zeilen darunter zihen, sodaß sich natürlich jeweils AB10 und AE10 in AB11 und AB...
07.11.2008 14:41:52
Thread-ID: 1022683
3 Beiträge
Anzeige
Combobox ausgeblendete Zeilen nicht anzeigen
helena

Schönen Guten Morgen
Kleines Problem ich verstecke Zeilen wenn in Spalte C Begriff nicht vorhanden dies klappt auch
aber via Combobox suche ich Namen (Adressvergabe) aber es werden mir immer alle aufgelistet auch wenn Zeilen ausgeblendet sind, ich Blende aus ob ich nur G_kunden oder P_...
28.12.2008 09:10:32
Thread-ID: 1035521
12 Beiträge
Kopieren von Nichtleeren Zellen per Formel
Nichtleeren

Moin,
auf der Arbeit soll ich eine Tabelle anpassen:
In Tabellenblatt1 ist eine Matrix M6:P109, in einigen Zeilen (Artikelnummern in loser Reihenfolge) stehen Werte, (die Artikel, die im Bürobestand fehlen) in den meisten nicht.
Die Zeilen, in denen Werte stehen, sollen nun in Tabel...
10.01.2009 20:43:46
Thread-ID: 1038525
4 Beiträge
kkleinste (ohne ausgeblendete Spalten)
Rainer

Hallo,
suche nach einer Möglichkeit, kkleinste jedoch ohne Berücksichtigung ausgeblendeter SPALTEN zu nutzen.
Habe in einem anderen Forum schon gepostet und bekam nur die Funktion TEILERGEBNIS mitgeteilt. Diese wiederrum klappt wohl nur mit Zeilen. Deshalb habe ich weiter gesucht und bi...
07.02.2009 19:33:00
Thread-ID: 1048127
14 Beiträge
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
Tab.1 filtern,Kopieren und in Tab.2 einfügen
Ünal

Hallo zusammen,
ich bin ein Anfänger was VBA angeht. Ich habe mir immer durch die hilfreichen Forums helfen können. Doch zu meiner jetzigen Frage habe ich noch kein Antwort gefunden .
Ich kopiere aus mehreren Text Dateien die Inhalte auf ein Excel-Tabellenblatt (1) Untereinander.
Da...
11.03.2009 16:06:48
Thread-ID: 1059163
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
9
2
4
2
2
11
3
13
3
2
2
1
20
1
1
5
2
2
1
7
8
5
12
7
2