Office: (Office 2016) Laufzeitfehler 3274 bei Excel-Export (externe Tabelle hat nicht das erwartete Format)

Beja · 26. Februar 2018

Auch, wenn Du einen Namen bei txtFileName eingibst? Mit der Load-Routine sollte dieses Textfeld eigentlich gesetzt werden.

Bei mir gibt Debug.Print outputFileName Pfad + Namen aus.

el_gomero · 26. Februar 2018

also - deine db lässt sich nicht kompilieren. Alle Objekte in eine neue db importiert und die Ausgabe funzt.

Habe den Code etwas nach meinem gusto modifizert:

Code:

Private Sub cmdOk_Click()
Dim strPath As String
Dim strFile As String
Dim strQRY As String
Dim qryD As QueryDef
Dim a$, i As Long
Dim Filter As Boolean
Dim rst As Object

'1. strQry mittels Kriterien gemäss Form zusammenstellen
strQRY = "SELECT WJ.WJID as ID, WJ.Datum, Kunden.KundenName as Kunde, WJ.Eintrag_WJ as Eintrag"

If chkDauerExakt.Value = True Then
strQRY = strQRY & ", Format(WJ.Dauer_Exakt,""hh:nn:ss"") as Dauer"
End If

strQRY = strQRY & ", WJ.verbucht as Verbucht" & " From WJ Inner Join Kunden On WJ.Kunde = Kunden.KundenID WHERE "

If chkDatum.Value = True And (txtDatumAb.Value "" Or txtDatumBis.Value "") Then 'Filter nach Datum
If txtDatumAb.Value "" Then
strQRY = strQRY & " WJ.Datum >= " & Format(txtDatumAb.Value, "#mm/dd/yyyy#")
Filter = True 'Falls True => anschliessend "& AND"
End If
If txtDatumBis.Value "" Then
If Filter = True Then strQRY = strQRY & " AND"
strQRY = strQRY & " WJ.Datum
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Beja · 26. Februar 2018

Vielen herzlichen Dank! Ich habe die Objekte in eine neue DB exportiert und Deine Anpassungen berücksichtigt und jetzt funktioniert es einwandfrei!

Verstanden, was das Problem gewesen ist, habe ich allerdings nicht.

el_gomero · 26. Februar 2018

der Grund war, dass die db defekt war. Die Änderungen im Code eher Kosmetik zur besseren Lesbarkeit und besserem Verständnis. *wink.gif*

Office: (Office 2016) Laufzeitfehler 3274 bei Excel-Export (externe Tabelle hat nicht das erwartete Format)

Laufzeitfehler 3274 bei Excel-Export (externe Tabelle hat nicht das erwartete Format)

Laufzeitfehler 3274 bei Excel-Export (externe Tabelle hat nicht das erwartete Format)

Laufzeitfehler 3274 bei Excel-Export (externe Tabelle hat nicht das erwartete Format)

Laufzeitfehler 3274 bei Excel-Export (externe Tabelle hat nicht das erwartete Format) - Similar Threads - Laufzeitfehler 3274 Excel

VBA:Laufzeitfehler beim Einlesen in Variable

Datenbank bleibt gesperrt - laccdb wird nicht gelöscht

Access Laufzeitfehler 3048

Laufzeitfehler 9 VBA

VBA Laufzeitfehler 9

[VBA] .Documents.Open -> Laufzeitfehler 91

MS Access Lauftzeitfehler "2501"