Seite 2 von 2

Re: Mehrere Dateien zusammenfügen

Verfasst: Fr, 17.05.2013 07:54
von crush
Danke, dass keiner geholfen hat. (keine Ironie!) Die Lösung stand ja schon da... Und mit ein wenig suchen habe ich das draus gemacht:

Code: Alles auswählen

 batStr = Left(sCurURL, Len(sCurURL) - Len(FileNameOutOfPath(sCurURL))) & "join.bat"

Re: Mehrere Dateien zusammenfügen

Verfasst: Fr, 17.05.2013 12:33
von crush
Hallo, eine kleine Frage hätte ich noch. Wie kann ich aus dem Makro heraus die Batchdatei starten? Der Pfad ist bekannt, aber mit SimpleFileAccess und openFileRead komme ich nicht wirklich weiter.

Gruß zum Wochenende
crush

Re: Mehrere Dateien zusammenfügen

Verfasst: Fr, 17.05.2013 12:52
von bst
Hi,

versuche das mal mit shell, ggf. mit Shell("cmd /c PfadUndNameDerBatch")

Und ebenfalls ein schönes Wochenende,

Bernd

Re: Mehrere Dateien zusammenfügen

Verfasst: Fr, 17.05.2013 12:58
von crush
Hallo, habe jetzt

Code: Alles auswählen

Shell("cmd /c" & sbatStr)
eingefügt. Aber es passiert nicks, kommt aber auch keine Fehlermeldung. Liegt es daran, dass ich vorher erst die Datei an diesen Ort hinkopiere und sie somit zur Laufzeit noch nicht bekannt ist?

Gruß crush

Re: Mehrere Dateien zusammenfügen

Verfasst: Fr, 17.05.2013 13:42
von bst
Hi,

Lasse mal den cmd /c weg, warum auch immer?

Code: Alles auswählen

shell "e:\test\test.bat"
funktioniert hier. Oder nimm ShellExecute.

Siehe: http://forum.openoffice.org/en/forum/vi ... 20&t=14220

cu, Bernd

Re: Mehrere Dateien zusammenfügen

Verfasst: Di, 21.05.2013 08:18
von crush
Moin,

so, Shell("C:\....") hat funktioniert, hatte jetzt auch den Aufruf im Handbuch gefunden.

Schönen Wochenstart

Gruß crush

Re: Mehrere Dateien zusammenfügen

Verfasst: Mo, 10.06.2013 14:17
von crush
Hallo,

ich musste nun auf Wunsch dem ersten Tabellenblatt mit den Daten auch ein zweites Blatt mit einem Datenpiloten zur Auwertung anhängen. Bei der Konvertierung in die CSV soll aber nur das erste Tabellenblatt berücksichtigt werden. Nun schein er aber immer das Blatt zu greifen, in dem vor dem Speichern zuletzt gearbeitet wurde. Gibt es einen Filter für storeAsUrl, der mir nur ein explizites Tabellenblatt konvertiert, oder ist diese Methode nur sicher, wenn die ODS-Datei nur aus einem Tabellenblatt besteht?

Gruß crush

Re: Mehrere Dateien zusammenfügen

Verfasst: Mo, 10.06.2013 17:35
von bst
Hi,

das funktioniert wohl so wie in Excel, die gerade aktive Tabelle wird exportiert. Es scheint also auszureichen diese nach dem Öffnen zu wechseln.

Code: Alles auswählen

         oSheet = oWorkbook.Sheets.getByIndex(0)
         oWorkbook.getCurrentController.setActiveSheet(oSheet)
HTH, Bernd

Re: Mehrere Dateien zusammenfügen

Verfasst: Di, 11.06.2013 12:03
von crush
Hallo,

dankeschön. Geht wunderbar. Habs noch von "getByIndex" auf "getByName" geändert, dass es dann wirklich eindeutig ist, nicht dass noch jemand die Reihenfolge der Tabellen vertauscht. Werde aber wahrscheinlich sowieso die Option "Dokument schützen" dann hat sich der Punkt schonmal erledigt.

Gruß crush