HI Jörn
I export my reports (queries) in Excel via a procedure somthing like this:
Public Sub LastMinutesExport()
On Error GoTo LastMinutesExport
Dim strqryLastMinutesExport As String
Select Case strLanguage
Case "N" 'Netherlands
strqryLastMinutesExport = "qryLastMinutesPlusTariefN"
Case "F" 'France
strqryLastMinutesExport = "qryLastMinutesPlusTariefF"
Case "D" 'Deutch
strqryLastMinutesExport = "qryLastMinutesPlusTariefD"
Case Else 'English
strqryLastMinutesExport = "qryLastMinutesPlusTariefE"
End Select
DoCmd.OutputTo acOutputQuery, strqryLastMinutesExport,
"MicrosoftExcel5.0/95Workbook(*.xls)", strMapXLS, False, "", 0,
acExportQualityPrint
LastMinutesExport:
Exit Sub
LastMinutesExport_Err:
MsgBox "ErrorLastMinutesExport"
Resume LastMinutesExport
End Sub
Perhaps there is a simular way to do just the same export, but not is .xls
but in .cvs format?
(cvs: seperator of the fields is de semicolon (,) and end of a record is the
CarriageReturn)