Das Notes Forum

Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: Kiezkicker am 18.08.11 - 11:09:29

Titel: Excel-Datei per LS als CSV speichern
Beitrag von: Kiezkicker am 18.08.11 - 11:09:29
Hallo,

ich nutze die Excel-Export-Agenten der Schablone Super NTF (OpenNTF.org). Nun wollte ich den Agenten gerne dahingehend erweitern, dass die Datei nicht nur angezeigt, sondern als CSV-Datei abgespeichert wird.

Leider hat das mit meinemsehr beschränktem LS-Wissen nicht ganz geklappt...

Ich habe an der Stelle, an der die Excel-Datei angezeigt wird folgende Zeile ergänzt:

xlApp.ActiveWorkbook.SaveAs "U:\test.csv"

Damit wird die Datei gespeichert, allerdings im Excel-Format. Was mir auch einleuchtet, da ja nirgends das Format festgelegt wird. Alelrdings habe ich genau das bisher auch nicht geschafft. Der Makro-Editor in Excel zeigt folgendes zum Speichern als CSV an:

ActiveWorkbook.SaveAs Filename:="U:\test.csv", FileFormat:=xlCSV, _

Leider ist es mit bisher nicht gelungen in LS das Format festzulegen. Hat jemand eine Idee, wie das funktionieren könnte?

MfG
Jens
Titel: Re: Excel-Datei per LS als CSV speichern
Beitrag von: Peter Klett am 18.08.11 - 11:39:48
xlApp.ActiveWorkbook.SaveAs ("U:\test.csv", xlcsv)

würde ich probieren. Dazu musst Du noch wissen, welchen Wert xlcsv in Excel hat. Dazu erstellst Du Dir ein Macro in Excel

Msgbox xlCSV

und führst das aus.

Den Wert, den die Box ausgibt, trägst Du anstelle von xlcsv in das LotusScript ein.
Titel: Re: Excel-Datei per LS als CSV speichern
Beitrag von: Kiezkicker am 18.08.11 - 11:43:10
Vielen Dank für die schnelle Antwort.

Das hat geklappt! Der richtige Wert war übrigens 6.
Titel: Re: Excel-Datei per LS als CSV speichern
Beitrag von: Patrick Schneider am 19.08.11 - 19:24:00
Das hat geklappt! Der richtige Wert war übrigens 6.

Ich hätte jetzt auf 42 als Ergebnis getippt...