Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1224to1228
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
1224to1228
1224to1228
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateien in einem Folder

Dateien in einem Folder
braleta
L&G,
ich sitze hier in Spanien, habe keine Litaratur und keine Hilfsbeispiele, und brauche einen Code, der mir die Dateien eines vorgegebenen Ordners auflistet, am Besten in ein eindimensionales Array (aber das kann ich selbst machen).
Ich habe das Archiv durchsucht, aber nichts gefunden.
Ich bin für jede Hilfe dankbar.
braleta

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Dateien in einem Folder
31.07.2011 21:40:42
Josef

Hallo Braleta,
die Dateinamen befinden sich nach Codedurchlauf in strFiles().
Sub Test()
  Dim strFiles() As String
  Dim strPath As String, strTmp As String
  Dim lngIndex As Long
  
  strPath = "E:\Forum"
  
  strPath = IIf(Right(strPath, 1) = "\", strPath, strPath & "\")
  
  strTmp = Dir(strPath & "*.*", vbNormal)
  
  Do While strTmp <> ""
    Redim Preserve strFiles(lngIndex)
    strFiles(lngIndex) = strPath & strTmp
    lngIndex = lngIndex + 1
    strTmp = Dir
  Loop
  
End Sub



« Gruß Sepp »

Anzeige
AW: Dateien in einem Folder
31.07.2011 22:10:22
braleta
Josef,
D.A.N.K.E.!!!!!
Genau das ist das, was ich gesucht habe. Mein Gedächtnis lässt nach, und ohne Literatur bin ich (fast) aufgeshmissen.
Danke
...braleta

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige