Microsoft Excel

Herbers Excel/VBA-Archiv

daten aus einem ordner öffnen | Herbers Excel-Forum


Betrifft: daten aus einem ordner öffnen von: Swen
Geschrieben am: 17.10.2008 19:49:47

Hi @ all,

ich möchte gerne in einem Ordner "C:\Testdaten\"
alle wk1 files öffnen und verarbeiten!

wie kann ich den machen das alle in dem ordner liegenden files
göffnet werden und ich dann eine verarbeitung starten, und wenn das file fertig
bearbeitet ist das nächste geöffnet wird! und so dann alle vorhanden files
bearbeitet wurden?

gruß
swen

  

Betrifft: AW: daten aus einem ordner öffnen von: Hajo_Zi
Geschrieben am: 17.10.2008 20:03:15

hallo Swen,

benutze die Suche nach Application.FileSearch


GrußformelHomepage


  

Betrifft: AW: daten aus einem ordner öffnen von: Tino
Geschrieben am: 17.10.2008 23:11:20

Hallo,
hier mal ein Beispiel mit der Dir Funktion, Kommentare stehen im Code.

Modul Modul1

Option Explicit 
'Funktioniert auch unter Office 2007! 
'Es werden aber keine Unterordner durchsucht! 
Sub Beispiel() 
Dim strFile As String 
Const strPfad As String = "C:\Testdaten\" 'Pfad 
 
 strFile = Dir$(strPfad & "*.wk1") 
 
Do Until strFile = "" 'Schleife bis keine Datei mehr vorhanden 
  
 'hier kann Deine Datei verarbeitet werden oder 
 'an eine Sub zum verarbeiten übergeben werden 
 Debug.Print strPfad & strFile 'Pfad und Dateiname 
 
 strFile = Dir$ 'nächste Datei suchen 
Loop 
 
 
End Sub 



Gruß Tino


Beiträge aus den Excel-Beispielen zum Thema "daten aus einem ordner öffnen"