OpenOffice.info

Verfasst: **Do, 07.09.2017 14:31**

Sorry, ich bin wirklich ganz neu und habe keine wirkliche Ahnung von Programmierung.
Ich muß 88 Tabellen von .csv nach .xls umwandeln, bin super happy diese Möglichkeit endlich ohne Umlautkauderwelsch mit Open Office gefunden zu haben. Nur eine Stapelverarbeitung wäre wirklich sehr erleichternd.

Kann mir da ein Profi Schritt für Schritt helfen?? Mit der einfachen Makro-Einstellung werden die Dateien überschrieben, das geht also nicht..

Schon mal Dank vorab!

Verfasst: **Fr, 08.09.2017 09:26**

zuerst alle csv-Dateien finden, z.B. wie in:
https://wiki.openoffice.org/wiki/Docume ... e_Library)

beispielsweise:

Code: Alles auswählen

Sub ShowFiles
  Dim NextFile As String
  Dim AllFiles As String
 
  AllFiles = ""
  NextFile = Dir("C:\", 0)
 
  While NextFile  <> ""
    If Rigtht(nextFile, 3) = "csv" Then
	'tue etwas
    End If
    NextFile = Dir
  Wend
 
End Sub

nun die csv öffnen, z.B. siehe:
http://www.starbasicfaq.de/Wiekannmanei ... l#Zweig135

in Verbindung mit den nötigen Filterangaben für csv, z.B. siehe:
http://www.starbasicfaq.de/filteroption ... eroptionen

und nun die geöffnete DAtei als xls speichern, z.B.:
http://www.starbasicfaq.de/WiekannmanDo ... l#Zweig136

oder siehe "Dokumente laden und speichern" in:
https://www.uni-due.de/~abi070/files/OO ... eutsch.pdf

beispielsweise:

Code: Alles auswählen

Dim args(0) As New com.sun.star.beans.PropertyValue
args(0).Name = "FilterName"
args(0).Value = "MS Excel 97"
ThisComponent.storeToURL(ConvertToURL("D:\meineDatei.xls"), args())

Gruß
Stephan

OpenOffice.info

Stapelverarbeitung

Stapelverarbeitung

Re: Stapelverarbeitung