Datei suchen??

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Datei suchen?? von: Timmy
Geschrieben am: 11.02.2005 13:37:34

Hallöchen!!

Hier wieder ein Problem welches ich leider nicht gelöst bekomme bzw, wenn man es überhaupt lösen kann.

Ich möchte gerne das ein Makro in einem Verzeichnis C:/eigene Dateien ,dort eine bestimmte Datei sucht, bzw nachschauen soll ob diese Datei darin enthalten und wenn ja dann auch öffnen soll.(Name Datei: Mappe1.xls) wenn nicht soll es schreiben "Datei nicht vorhanden"

Geht das und wenn wie.?

Gruß
Timmy
PS Ich habe ein Makro welches alle Dateien zelle für zelle listet (hilft das?)

Bild


Betrifft: AW: Datei suchen?? von: UweD
Geschrieben am: 11.02.2005 13:48:37

Hallo Timmy


so klappt es:


Sub Siehnach()
    Dim File$, Pfad$, Datei$
    Pfad = "C:\eigene Dateien\"
    Datei = "Mappe1.xls"
    File = Dir(Pfad & Datei) 'ist leer wenn Datei im VZ fehlt
    If Len(File) > 0 Then
        Workbooks.Open Filename:=File
        'mach was damit
        Workbooks(File).Close
    End If
End Sub

Gruß Uwe


Bild


Betrifft: AW: Datei suchen?? von: Timmy
Geschrieben am: 11.02.2005 14:08:25

Hallo

Ja , hab es ausprobiert :-) Funktioniert ehrlich super. Vielen Dank hast mir wirklich weitergeholfen.

Gruß

Timmy


Bild


Betrifft: AW: Datei suchen?? von: Nike
Geschrieben am: 11.02.2005 13:50:43

Hi,

check this:


Sub test()
If Dir("C:\test.xls") = "" Then
    MsgBox "Datei nicht da"
Else
    MsgBox "Datei da"
End If
End Sub


Bye

Nike


Bild


Betrifft: AW: Datei suchen?? von: Timmy
Geschrieben am: 11.02.2005 14:09:32

Danke für die Hilfe, beide Lösungen klappen.

Gruß Timmy


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Datei suchen??"