![]() |
![]() |
|
![]() |
![]() |
|
Programmierung Rat & Tat für Programmierer |
|
Themen-Optionen | Ansicht |
![]() |
#3 |
Veteran
![]() Registriert seit: 13.07.2002
Alter: 44
Beiträge: 242
|
![]() Office XP!
Funkt leider auch nicht :-( Code:
with fs .LookIn = "d:\" .FileType = msoFileTypeExcelWorkbooks .Filename = "*.*" .Execute If .Execute > 0 Then For i = 1 To .FoundFiles.Count MsgBox "File ist vorhanden (" & .FoundFiles(i) & ")" Workbooks.Open Filename:=.FoundFiles(i) Next i Else MsgBox "Das File ist nicht vorhanden" End If End With Und dann findet er wieder keine Files, die aber unter D:\ sind! Also ich versteh das nicht, was der da macht!! Mfg Frankster |
![]() |
![]() |
Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1) | |
|
|