Supportnet / Forum / Datenbanken
Spezialist für DialogSaveAS gesucht
Frage
Habe Access XP und eine Frage zu DialogSaveAS
Was mache ich bei diesem Code falsch.
Auf der Zeile [i]With Application.FileDialog(msoFileDialogSaveAs)[/i] kommt immer der Laufzeitfehler 445 Objekt unterstützt diese Aktion nicht
[code]
Dim Speichern
With Application.FileDialog(msoFileDialogSaveAs)
.TITLE = "Projektdatei Speichern"
.InitialFileName = "C:\"
.Filters.Add "UE32 Projektdatei", "*.PRJ"
.ButtonName = "Speichern"
If .Show = -1 Then
Speichern = .SelectedItems(1)
Else
Exit Sub
End If
End With
[/code]
FileDialogFilePicker, FileDialogFolderPicker und msoFileDialogOpen funktionieren
Habe folgende Verweisse:
VB For Applications
Microsoft Access 10.0 Object Libary
Microsoft Dao 3.6 Object Library
OLE Automation
Microsoft VB for Applications Extensibility 5.3
Microsoft Forms 2.0 Object Library
Hat jemand ein Fehler gefunden währe Euch sehr Dankbar. Vielen Dank
Antwort 1 von Koebi
Hallo Ricco
Ich selbst verwende immer den API-Filedialog von C. Pries, der braucht keine Verweise. Habe darum zuwenig Erfahrung mit dem FileDialog.
Bei Dir scheint der Verweis auf die Office Object Library zu fehlen.
Und sonst schau mal hier, besonders die letzte Antwort von Henry Habermacher:
http://groups.google.ch/group/de.comp.datenbanken.ms-access/browse_thread/thread/2451d7951573bd08/f0fbf6121a19563b?hl=de#f0fbf6121a19563b
Gruss
Köbi
Ich selbst verwende immer den API-Filedialog von C. Pries, der braucht keine Verweise. Habe darum zuwenig Erfahrung mit dem FileDialog.
Bei Dir scheint der Verweis auf die Office Object Library zu fehlen.
Und sonst schau mal hier, besonders die letzte Antwort von Henry Habermacher:
http://groups.google.ch/group/de.comp.datenbanken.ms-access/browse_thread/thread/2451d7951573bd08/f0fbf6121a19563b?hl=de#f0fbf6121a19563b
Gruss
Köbi

