Im Windows Ordner nach einer best. Datei suchen und öffnen

[Muhtar99]

Hallo Leute,

möchte aus access vba den Pfad C:\temp nach excel dateien suchen wenn gefunden öffnen.

den namen der excel datei gebe ich aus vba vor. der code soll nun das verzeichnis nach diesem namen suchen und wenn gefunden öffnen

wie mache ich das ?


Danke im Voraus


Muhtar99

[bahasu]

N'abend

    Dim DeineDatei As String
    Dim PfadDateiName  As String
   
    DeineDatei = "DeineExcelDatei.xls"
    PfadDateiName = "c:\temp\" & DeineDatei
   
    If Dir(PfadDateiName) <> "" Then
        FollowHyperlink (PfadDateiName)
    Else
        MsgBox "nicht da"
    End If


Hilft das?

Harald

[Muhtar99]

Danke dir hat super geholfen