Kopieren von Zellenbereichen zwischen 2 dokuenten

[kuraschima]

Hallo,
Ich habe folgendes Problem:
Ein Dokument, welches ich durch ein Makro erstellt habe, soll nun mit Zellenbereichen gefüllt werde. Diese Zellenbereiche möchte ich aus dem Dokument kopieren, mit dem ich das neue Dokument erstellt habe:

Code: Alles auswählen

ThisDoc = thisComponent.sheets("Tabelle1")

myrange = ThisDoc.getCellRangeByName("A1:BN3")

NewDoc = StarDesktop.loadComponentFromURL ("private:factory/scalc","_blank", 0, mArgs())

newrange = NewDoc.sheets(0).getCellRangeByName("A1:BN3")

Alle Werte aus "myrange" sollen nach "newrange" kopiert werden.
Bisher habe ich keine Methode für das Kopieren zwischen verschiedenen Dateien Gefunden.


Herzlichen Dank!

Gruß

[Karolus]

Hallo

Versuch mal:

Code: Alles auswählen

    ThisDoc = thisComponent.sheets("Tabelle1")

    myrange = ThisDoc.getCellRangeByName("A1:BN3")
    data = myrange.getDataArray() 'alternativ .getFormulaArray

    NewDoc = StarDesktop.loadComponentFromURL ("private:factory/scalc","_blank", 0, mArgs())

    newrange = NewDoc.sheets(0).getCellRangeByName("A1:BN3")
    newrange.setDataArray( data ) 'alternativ .setFormulaArray

Mit 'get/setDataArray' werden nur Werte und Textinhalte übertragen - alle Formatierungen ( auch bsplw. Datums/Zeitformate) gehen verloren.

Mit 'get/setFormulaArray werden im Falle von 'echten' Formeln diese Formeln übertragen, (was nicht unbedingt gewollt ist) falls aber im Quellbereich keine 'echten' Formeln stehen, werden auf diese Weise die Zahlenformate mit übertragen.

Karolus