Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
772to776
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
772to776
772to776
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateinamen und -anzahl aus Ordner ermitteln

Dateinamen und -anzahl aus Ordner ermitteln
21.06.2006 23:49:55
Robert
Guten Abend Freunde,
bin gerade am rumbasteln und dabei auf folgendes Problem gestoßen.
Ich will in einem sheet die Daten aus mehreren xls-Datei'en zusammensuchen. Die Dateien sind alle im selben Ordner und unterliegen einer strukturierten Namensgebung. Ich muss nun also die anzahl der Dateien in dem Ordner ermitteln und wenn möglich gleich deren namen in einer spalte ablegen, um mit hilfe eines dynamischen sverweises auf die Daten zuzugreifen. Die Anzahl der Dateien kann variieren und sich im Laufe der Zeit erhöhen.
Kann mir jemand bei der Lösung dessen helfen?
mfg Robert

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateinamen und -anzahl aus Ordner ermitteln
22.06.2006 00:14:27
IngGi
Hallo Robert,
das folgende Makro listet alle Dateien eines Verzeichnisses in Spalte A des aktiven Tabellenblattes, beginnend in Zelle A1.

Sub Dateien_zeigen()
Dim strDatName
Range("A1") = Dir("C:\Temp\") 'Verzeichnis anpassen
strDatName = Dir
Do Until strDatName = ""
Range("A65536").End(xlUp).Offset(1, 0) = strDatName
strDatName = Dir
Loop
End Sub
Gruss Ingolf
AW: Dateinamen und -anzahl aus Ordner ermitteln
22.06.2006 09:59:35
Robert
Guten Morgen IngGi,
vielen Dank für deine Antwort. Scheint auch fast zu funktionieren nur bricht er nachdem der erste wert in A dann steht ab. Im debugger is dann die Zeile
Range("A65536").end(x1up).offset(1,0)=strdatname
gelb markiert. er labbert irgendwas von Anwendungs oder Objektdefinierter Fehler 'Laufzeitfehler 1004'. Was kann ich dagegen tun und woher nimmst Du Dein Fachwissen? Kannst Du da was empfehlen?
mfg Robert
Anzeige
AW: Dateinamen und -anzahl aus Ordner ermitteln
22.06.2006 10:36:34
IngGi
Hallo Robert,
den Fehler kann ich leider überhaupt nicht nachvollziehen. Bei mir funktioniert das perfekt. Es sei denn, bei dir steht die betreffende Programmzeile tatsächlich so, wie du geschrieben hast, nämlich
Range("A65536").end(x1up).offset(1,0)=strdatname
Es muss xlup heissen, nicht x1up (l wie Lima statt der Ziffer 1 - ist im Schriftbild leider sehr schlecht, teilweise, wie oben, auch überhaupt nicht zu unterscheiden).
Ein Lehrbuch oder so kann ich dir leider nicht empfehlen. Ich selbst habe vor ca. 25 Jahren mit Basic auf dem C64 angefangen, mich mit dem Programmieren zu beschäftigen. VBA hab ich dann zunächst mit einem - schlechten, weil sehr rudimentären - Lehrbuch angefangen und danach durch "learning by doing" unter anderem auch mit Hilfe dieses Forums erlernt.
Gruß Ingolf
Anzeige
AW: Dateinamen und -anzahl aus Ordner ermitteln
22.06.2006 10:55:45
Robert
Du hast recht, es lag an dem L bzw. der 1
vielen Dank nochmal
ps: ich hatte auch einen c64 aber nur so zum spielen weil ich ja da noch klein war...hehe
den hab ich auch immernoch
mfg Robert

305 Forumthreads zu ähnlichen Themen

Dateinamen auslesen (aus Ordnernamen in Spalte)
Tobias

Dieses Script sollte eine Dateiliste erstellen, wenn der Ordner- bzw. Verzeichnisname in der Spalte A steht.
Quelle: https://www.herber.de/mailing/072499h.htm
Ich bekomme aber Laufzeitfehler 445. Objekt unterstützt diese Aktion nicht.
Woran kann das liegen? Benutze Excel 2007
08.02.2009 21:31:46
Thread-ID: 1048494
6 Beiträge
Anzeige
Excel Dateien aus Ordner auslesen (Fragebogen)
Bene

Hallo zusammen!
Ich schreibe momentan an meiner Diplomarbeit und brauche in dem Zusammenhang unbedingt eure Unterstützung in Sachen VBA-Programmierung.
Ich habe nicht wirklich Ahnung von VBA und bastel jetzt schon seit einer ganzen Weile an meinem Problem herum. Im Forum konnte ich lei...
05.08.2009 11:36:40
Thread-ID: 1093693
6 Beiträge
Bilder aus einem Ordner auslesen
RR

Hallo zusammen,
Bin neu hier und habe mal eine Frage an die
Profis über VBA
Folgendes Problem.
Besteht die möglichkeit das wenn ich einen Commandbutton drücke (oder beim öffnen der Tabelle) das eine Userform oder soetwas ähnliches aufgeht wo ich dann den Ordner aussuchen kann sp...
07.10.2009 16:28:26
Thread-ID: 1107899
15 Beiträge
Anzeige
Alle PDF´s aus Ordner und Unterordner auslesen!
Thomas

Einen schönen guten Morgen,
unter Ordner auslesen hab ich nicht das gefunden was ich suche, daher wende ich mich Hilfe suchend an euch.
Ich will aus "C:\...\...\Miete und NK\" alle PDF Dateien auslesen. In Miete und NK befinden sich Unterordner\Unteroerdner und aus denen sollen alle in...
19.02.2012 11:13:29
Thread-ID: 1251429
14 Beiträge
Verzeichnis mit Unterverzeichnis auslesen
Matthias

Hallo, wie kann ich via Makro in einem Verzeichnis und Unterverzeichnissen alle gewissen dateitypen auslesen?
Z.B. MP3s!Sie sollen dann via Hypertink unter Excel erscheinen, sodas sie dann aus Excel geöffnet werden können ...
21.06.2002 11:06:24
Thread-ID: 130384
4 Beiträge
Dateinamen aus einem Ordner in Tabelle schreiben
Markus

Hallo liebes Forum,
ich habe einen Ordner, in dem sich eine große Menge Bilddateien (.jpg) befinden.
Gibt es eine Möglichkeit per VBA, diesen Ordner auszulesen und die Dateinamen in eine Excel-Tabelle zu schreiben ?
Das Problem betrifft nur einen einzigen Ordner, so dass ich den P...
27.02.2013 17:52:39
Thread-ID: 1301378
2 Beiträge
Subordnerpfade aus mehreren Ordner auslesen
Jack

Hallo Leute,
folgendes:
Mein Ziel wäre es mehrere Verzeichnisse: z.B
K:\Ordner1
K:\Ordner2
K:\Ordner3
auszulesen und dessen Subordner(am besten mit kompletten Pfad z.B. "K:\Ordner1\Bla") in Excel auflistet
Sodass am Ende, das bei rauskommt:
K:\Ordner1\Bla1
...
21.06.2014 12:19:25
Thread-ID: 1366775
5 Beiträge
Excel-Dateien aus Ordner auslesen
M.Bacher

Hallo, nach langem habe ich mal wieder eine Frage, die sich auf ein Thema bezieht das auch schon länger her hier im Forum diskutiert wurde (2007).
Hier der Link:
https://www.herber.de/forum/archiv/864to868/867500_Excel_Dateien_aus_Ordner_auslesen.html
Nun hat Josef Ehrenberger eine...
05.11.2014 15:09:57
Thread-ID: 1390648
6 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
5
2
5
14
1
13
3
1
4
5
9
1
1
4
1
3
1
1
6
23
4
6
7
2
3