Word-Dokumente in Schleife verarbeiten

Computer: Software & Programmierung Visual Basic
1

Hallo,

ich möchte mit einem VB-Skript ca. 500 Word-Dokumente bearbeiten.
Diese Dokumente stehen alle in einem Ordner. Kann man alle Dokumente
in einer Schleife abarbeiten, ohne ein Feld mit allen Dateinamen + Pfad
zu erstellen? Würde also gerne alle *.doc Dateien in einer Schleife
einlesen, ohne den Namen des Dokuments zu kennen. Geht das?

Vielen Dank im Voraus,
Tom

2

Hi,

also : JA!!

Schau dir mal die Funktionen des FileSystem-Objektes an.

Dim fl As Object
Dim fs As Object
Dim myFolder As Object

Set fs = CreateObject(„Scripting.FileSystemObject“)

Set myFolder = fs.GetFolder(„Hier_kommt_der_Verzeichnisname_hin“)
If myFolder.Files.Count > 1 Then
For Each fl In myFolder.Files
’
’ ja was mach man nun mit der Datei???
’
Next fl

End If

Tschau
Peter

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

Wenn Du es nur mit dem VB-Dir$-Befehl programmieren möchtest:

Dim sFile As String
sFile = Dir$("d:\Word\*.doc")
While sFile ""
 Debug.Print sFile
 sFile = Dir$
Wend

greets from michL (vienna)