WCM - Das österreichische Computer Magazin Forenübersicht
 

Zurück   WCM Forum > Rat & Tat > Programmierung

Programmierung Rat & Tat für Programmierer

Microsoft KARRIERECAMPUS

 
 
Themen-Optionen Ansicht
Alt 21.07.2002, 15:01   #3
Frankster
Veteran
 
Registriert seit: 13.07.2002
Alter: 44
Beiträge: 242


Standard

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
Hab mal Filename *.* eingetragen und der findet Files die ich schon längst in einen anderen Ordner verschoben haben.
Und dann findet er wieder keine Files, die aber unter D:\ sind!
Also ich versteh das nicht, was der da macht!!

Mfg
Frankster
Frankster ist offline   Mit Zitat antworten
 


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)
 

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge hochzuladen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.

Gehe zu


Alle Zeitangaben in WEZ +2. Es ist jetzt 14:14 Uhr.


Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Forum SEO by Zoints
© 2009 FSL Verlag