Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VBA - Verzeichnis und dann ausgewählte Eceldatei öffnen
Autor: robbi2000
Datum: 05.03.03 10:16
Hallo zusammen, ich habe ein Problem. In meiner Access 2002 Datenbank habe ich einen Commandbutton -roCommand8_Click()- mithilfe dessen ich einen Dateiöffnen Dialog aufrufen möchte. Dazu will ich einen "Startpfad" vorgeben in dem die Dateien liegen und wovon ich dann eine bestimmte öffnen will (Eceldateien). Ich habe einen Code der beschriebenes ausführt. Wenn ich dann aber in dem Datei- öffnen Dialog die entsprechende Exceldatei öffnen will kommt folgender Fehler: Laufzeitfehler '-2147352567 (80020009)' Das Feld ist zu klein für die Datenmenge, die Sie hinzufügen wollten. Versuchen Sie, weniger Daten einzufügen. Es sieht also so aus, als wenn die Excel Datei in Access und nicht als Exceldatei geöffnet werden soll. Folgender Code wurde verwendet: Private Sub roCommand8_Click() Dim Fold As String Dim Titel As String Dim Filter As String Dim Flags As Long Dim StartPfad As String Fold = CStr(KundenNr) & CStr(ID) Filter = "Excel-Dateien" & Chr$(0) & "*.xls" & Chr$(0) _ & "Add-Ins" & Chr$(0) & "*.mda" & Chr$(0) _ & "Text-Dateien" & Chr$(0) & "*.txt" & Chr$(0) _ & "Alle Dateien" & Chr$(0) & "*.*" & Chr$(0) & Chr$(0) Titel = "Datei öffnen" Flags = 4 StartPfad = "C:\Dokumente und Einstellungen\Robbi\Desktop\Czesny DB\" & Fold Me.txtPfad2 = OpenFile(Titel, Filter, Flags, , StartPfad) 'MsgBox OpenFile(Titel, Filter, Flags, , StartPfad) End Sub Wo liegt der Fehler ?? Es geht mir darum, dass ich mittels Commandbutton einen kundenspezifischen Ordner (Fold) öffnen, eine von mehreren Exceldateien auswählen und in Excel öffnen lassen kann. Vielen herzlichen Dank für Eure Hilfe. Robbi

VBA - Verzeichnis und dann ausgewählte Eceldatei öffnen

643

robbi2000

05.03.03 10:16

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen