Application.GetOpenFilename+Dateiart
18.08.2008 22:30:43
SteffenS
ich möchte über
FName = Application.GetOpenFilename(filefilter:="Zip Files (*.zip), *.zip", Title:="Import Datei öffnen", MultiSelect:=False)
eine ZipDatei weiterverarbeiten.
Leider kann ich diese über diesen Befehl unter Excel 2000 nicht auswählen.
Wenn ich es mit:
Dim objXL As Object
Set objXL = CreateObject("Excel.Application")
FName = objXL.GetOpenFilename(filefilter:="Zip Files (*.zip), *.zip", _
Title:="Import Datei öffnen", MultiSelect:=False)
mache funktioniert es unter Excel 2007 nicht.
Was muss ich tun damit die Auswahl generell funktioniert.
Danke im Voraus.
MFG
Steffen Schmerler