Exportieren in CSV und bestimmte Zeichen entfernen/ändern

20/04/2010 - 18:24 von Heinrich Lona | Report spam
Hallo

ich möchte in A07 Daten aus Abfragen

1.) in das MS-DOS-CSV-Format exportieren.

Dazu habe ich ein Form indem ich 3 Auswahlfelder (Kategorie, Artikel,
Fabrikant) habe
und einen Button der die Aktion startet.

Zur Zeit habe ich folgende, nicht zufriedenstellende Lösung:

If Kategorie = -1 Then
DoCmd.OutputTo acOutputQuery, "qryKategorie", "xlsx",
"D:\KategorieWeb.xlsx", False, "", 1, acExportQualityPrint
End If

If Artikel = -1 Then
DoCmd.OutputTo acOutputQuery, "qryArtikel" ...
End If

If Fabrikant= -1 Then
DoCmd.OutputTo acOutputQuery, "qryFabrikant" ...
End If

(xlsx, da der Export in das CSV-Dateiformat mit A07 auch nach mehreren
Versuchen nicht funktionieren will)

2.) in der exportierten CSV-Datei (und nur in dieser) sollen beim Export
bestimmte Zeichen entfernt/geàndert werden.
Die Zeichen entferne/àndere ich derzeit in Excel.

Das kann VBA sicherlich schneller und besser, weiß allerdings nicht wie der
Code aussieht und wo ich ihn einbinden muß.

2.a) Es sollen alle Buchstaben, "à" durch "a"; "ö" durch "o" usw. ersetzt
werden nicht jedoch "à" durch "ae" etc. auch nicht "ß" durch "ss".
2.b) Außerdem sollen alle "?" Symbole gelöscht und alle "," in den Betràgen
durch "." ersetzt werden.
2.c) In den ausgewàhlten Optionsfeldern soll "1" anstatt "WAHR" geschrieben
werden.

Gruß
Heinrich
 

Lesen sie die antworten

#1 Peter Doering
21/04/2010 - 10:32 | Warnen spam
Hallo,

Heinrich Lona wrote:

ich möchte in A07 Daten aus Abfragen

1.) in das MS-DOS-CSV-Format exportieren.
[...]
2.) in der exportierten CSV-Datei (und nur in dieser) sollen beim Export
bestimmte Zeichen entfernt/geàndert werden.
[...] "à" durch "a"; "ö" durch "o" usw.
[...] "1" anstatt "WAHR"



Warum gehst du ueber OutputTo? Bei den Anforderungen koenntest du die Datei
auch selbst erzeugen (Open ... For Output) und vor dem Schreiben per
Replace die Zeichen ersetzen.

Gruss - Peter

Mitglied im http://www.dbdev.org
FAQ: http://www.donkarl.com

Ähnliche fragen