Excel Datei öffnet nicht
19.08.2014 12:38:42
Kurt
ich habe das folgende Makro, zum öffnen einer Excvel Datei.
Leider läßt sich nicht eine xlms Datei öffnen.
Hat jemand einen Tip ?
gruß kurt k
Public Sub Datei_Starten()
Dim strDatei
ChDrive "C:\"
ChDir "C:\_Muster\"
strDatei = Application.GetOpenFilename("Microsoft Excel-Dateien ,*.*")
If strDatei = False Then Exit Sub
Workbooks.Open strDatei
End Sub
Anzeige