Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
320to324
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
320to324
320to324
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Alle xls-Dateien eines Ordners öffnen

Alle xls-Dateien eines Ordners öffnen
08.10.2003 12:54:24
Remo
Hallo Leute

Ich möchte alle Excel-Dateien eines Ordners öffnen.
Weiss aber nicht recht wie ich das anstellen muss.

Kann mir jemand helfen?

Gruss Remo

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

Betreff
Datum
Anwender
Anzeige
AW: Alle xls-Dateien eines Ordners öffnen
08.10.2003 12:57:54
xXx
Hallo,
schau dir mal die Filesearch-Methode und das FoundFiles-Objekt an.

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!
AW: Alle xls-Dateien eines Ordners öffnen
08.10.2003 13:00:38
Andi_H
Hi Remo,
versuch mal diesen Code: (verzeichnis anpassen)


Sub alleoeffnen()
Dim i As Long
Const verz = "c:\windows\desktop\"
ChDir verz
With Application.FileSearch
.NewSearch
.LookIn = verz
.SearchSubFolders = False
.FileType = msoFileTypeExcelWorkbooks
.Execute
For i = 1 To .FoundFiles.Count
Workbooks.Open .FoundFiles(i)
Next i
End With
End Sub


Gruß

Andi
Anzeige
AW: Alle xls-Dateien eines Ordners öffnen
08.10.2003 13:12:59
Remo
Danke vielmal! Du bist für mich der neue Excelgott!
Danke für die Rückmeldung! o.t.
08.10.2003 13:21:12
Andi_H

310 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige