Application.GetOpenFilename Kontrolle Rückgabewert
-
30 April 2012 7:48
In einem Excel-Makro nutze ich die Methode Application.GetOpenFilename.
Der Rückgabewert ist, auch in der Online-Hilfe, folgendermaßen beschrieben:
“This method returns the selected file name or the name entered by the user. The returned name may include a path specification. Returns False if the user cancels the dialog box.”
Um den Fehlerfall abzufangen, wird im Code eine Abfrage entsprechend folgendem Beispiel (aus der Excel-Hilfe) empfohlen:
fileToOpen = Application _
.GetOpenFilename("Text Files (*.txt), *.txt")
If fileToOpen <> False Then
MsgBox "Open " & fileToOpen
End If
Bei früheren Excel-Versionen hat dies einwandfrei funktioniert. Im aktuellen Excel 2007 wird aber die Abfrage „fileToOpen <> False“ mit folgender Fehlermeldung quittiert:
"Laufzeitfehler '13': Typen unverträglich"
Leider habe ich weder in der Excel-Hilfe, noch in der VBA-Hilfe, noch im Internet auf den MSDN-Seiten einen Hinweis gefunden, wie eine entsprechende Abfrage an den Anwender nach einer Datei mit entsprechender Sicherheit, falls der Anwender keine Datei wählt, implementiert werden kann.
Wie ist eine entsprechende Funktionalität unter Excel 2007 mit VBA 6.5 zu implementieren?
Vielen Dank !!!
- Jenis yang Diubah Robert BreitenhoferMicrosoft Contingent Staff, Owner 07 Mei 2012 9:36 Keine Rückmeldung des Fragenstellender
Semua Balasan
-
30 April 2012 12:51Pemilik
Bei früheren Excel-Versionen hat dies einwandfrei funktioniert. Im aktuellen Excel 2007 wird aber die Abfrage „fileToOpen <> False“ mit folgender Fehlermeldung quittiert:
"Laufzeitfehler '13': Typen unverträglich"
Hallo Uwe Löw,
Man sieht nicht das eingebettete Bild in Deinem Beitrag.
Jetzt kannst Du auch Bilder in die Beiträge einfügen: [Info] Neue Grafikfunktion für MSDN Forenbeiträge | Neue Forum Feature: Bilder in einem Beitrag einfügen
Bitte um Korrektur.
Danke und Grüße,
Robert
Robert Breitenhofer, MICROSOFT
Bitte haben Sie Verständnis dafür, dass im Rahmen dieses Forums, welches auf dem Community-Prinzip „Entwickler helfen Entwickler“ beruht, kein technischer Support geleistet werden kann oder sonst welche garantierten Maßnahmen seitens Microsoft zugesichert werden können. -
07 Mei 2012 9:36Pemilik****************************************************************************************************************
Dieser Thread wurde mangels weiterer Beteiligung des Fragestellenden ohne bestätigte Lösung abgeschlossen.
Neue Rückfragen oder Ergänzungen zu diesem Thread bleiben weiterhin möglich.
****************************************************************************************************************Robert Breitenhofer, MICROSOFT
Bitte haben Sie Verständnis dafür, dass im Rahmen dieses Forums, welches auf dem Community-Prinzip „Entwickler helfen Entwickler“ beruht, kein technischer Support geleistet werden kann oder sonst welche garantierten Maßnahmen seitens Microsoft zugesichert werden können.
