Seite 1 von 1

[gelöst] - Bestimmte Zellen in eine ander Tabelle verschieben/kopieren

Verfasst: Mi 8. Dez 2021, 03:42
von fbarc
Hallo,

ich habe in einer Tabelle 5 Spalten, die ich über den Tag fülle.
Am Ende des Tages sollen alle Zellen [B7:G50], so wie sie sind in eine weitere Tabelle verschoben werden.
Und zwar an das Ende der letzten Zeile.

Ich habe das zwar schon mit Macro-Aufzeichnung versucht, aber da blickt man ja überhaupt nicht durch was der Code macht.

Meine Code-Versuche funktionieren noch nicht.
Vielleicht hat ja jemand einen Tipp zum erstellen...

Folgende Dinge habe ich schon gefunden...

Zum Festlegen des zu Kopierenden Bereichs

Code: Alles auswählen

QuelleStartCol=1
QuelleStartRow=6
QuelleEndCol=6
QuelleEndRow=49
oRange=oSheet1.getCellRangeByPosition(QuelleStartCol,QuelleStartRow,QuelleEndCol,QuelleEndRow)
ZielStartCol=1
ZielStartRow=6

Code: Alles auswählen

oSheet2.getCellByPosition(ZielStartCol,ZielStartRow).Value=oSheet1.getCellByPosition(QuelleStartCol,QuelleStartRow).Value
Ich hatte schon mit Schleifen probiert und auch geschafft , daß die 1. Zelle kopiert wird. Aber nicht die ganze Zeile.

Mir fehlen die richtigen Befehle dazu...

Kann da jemand helfen?
mfg

Re: Bestimmte Zellen in eine ander Tabelle verschieben/kopieren

Verfasst: Mi 8. Dez 2021, 10:48
von karolus
Hallo

Etwa so:

Code: Alles auswählen

sub backup
	doc = thisComponent
	quelle = doc.Sheets.getByName("Tabelle1") 'ggf. anpassen'
	quelle_addresse = quelle.getCellRangeByName("B7:G50").RangeAddress
	ziel = doc.Sheets.getByName("Tabelle2") 'ggf. anpassen
	dummy = ziel.getCellRangeByName("B1").CellAddress 
	cursor = ziel.createCursor()
	cursor.gotoEndOfUsedArea(0)
	dummy.Row = cursor.RangeAddress.EndRow +1
	ziel.copyRange(dummy, quelle_addresse )
end sub


Re: Bestimmte Zellen in eine ander Tabelle verschieben/kopieren

Verfasst: Fr 10. Dez 2021, 03:17
von fbarc
Ja, genau, das war es was ich suchte.

So wie du es geschrieben hast kann ich das sogar nachvollziehen.

Vielen Dank...

Gibt es irgendwo eine Beschreibung der Befehle?
In der Hilfedatei vom Libre steht da nichts drin und sonst hab ich im Netz auch nichts richtiges dazu gefunden...

Re: Bestimmte Zellen in eine ander Tabelle verschieben/kopieren

Verfasst: Fr 10. Dez 2021, 14:34
von karolus
Hallo

Relativ Einsteigerfreunlich ist die Seite vonMichael Dannenhöfer
Ansonsten ein MUSS ist ein gescheiter Objectinspector: mri.oxt

Re: Bestimmte Zellen in eine ander Tabelle verschieben/kopieren

Verfasst: Fr 10. Dez 2021, 14:54
von craig

Re: Bestimmte Zellen in eine ander Tabelle verschieben/kopieren

Verfasst: Fr 10. Dez 2021, 20:25
von fbarc
Vielen lieben Dank...

sowas suche ich schon eine ganze Weile...