BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!

❤️ DANKE >><< DANKE ❤️

> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

[GELÖST] Zellbereich mit absoluten Bezügen kopieren und einfügen

Alles zur Programmierung im LibreOffice.
Antworten
Ich Bins
Beiträge: 236
Registriert: Do 2. Aug 2018, 12:30

[GELÖST] Zellbereich mit absoluten Bezügen kopieren und einfügen

Beitrag von Ich Bins » Mi 17. Nov 2021, 10:55

Hallo zusammen,

den Zellbereich G34:H44 der absolute Bezüge (=$'Probe-2'.D127) zum Arbeitsblatt Probe_1 enthält möchte ich mit Basic kopieren und an der Position G19 einfügen.
Mit dem Code

Code: Alles auswählen

Sub absolut_kopie
  doc=thiscomponent
  mysheet=doc.Sheets().getByName("Probe")
  QuelleRange=mysheet.getCellRangeByName("G34:H44")  
  QuellRangeAddresse = QuelleRange.getRangeAddress
  Ziel = mysheet.getCellByPosition(6,18)
  'Ziel = mysheet.getCellByName("G19") ?????
  ZielCellAdresse=Ziel.getCellAddress
  'kopierten Bereich einfügen
  mysheet.copyRange(ZielCellAdresse,QuellRangeAddresse)
  End Sub
ist es möglich, jedoch verschiebt sich der absolute Bezug um den Versatz (=$'Probe-2'.D112).

Wie kann man die absoluten Bezüge an eine andere Position verschieben, so dass kein Versatz entsteht?
Wie kann man

Code: Alles auswählen

Ziel = mysheet.getCellByPosition(6,18)
als

Code: Alles auswählen

Ziel = mysheet.getCellByName("G19")
angeben?

Viele Grüße
Ich Bins
Zuletzt geändert von Ich Bins am Mo 22. Nov 2021, 00:43, insgesamt 1-mal geändert.

Benutzeravatar
karolus
Beiträge: 2170
Registriert: Fr 10. Dez 2010, 10:01

Re: Zellbereich mit absoluten Bezügen kopieren und einfügen

Beitrag von karolus » Mi 17. Nov 2021, 11:23

Hallo
absolute Bezüge (=$'Probe-2'.D127)
Dein absoluter Bezug ist nur absolut in Bezug aufs Tabellenblatt, du brauchst aber offensichtlich einen absoluten Bezug auf die Zeilennummer:

absolute Bezüge (=$'Probe-2'.$D$127)
LO7.4.7.2 debian 12(bookworm) auf Raspberry4b 8GB (64bit)
LO7.6.3.2 flatpak debian 12(bookworm) auf Raspberry4b 8GB (64bit)

Benutzeravatar
karolus
Beiträge: 2170
Registriert: Fr 10. Dez 2010, 10:01

Re: Zellbereich mit absoluten Bezügen kopieren und einfügen

Beitrag von karolus » Mi 17. Nov 2021, 12:05

Hallo
Ichbins hat geschrieben:Wie kann man

Code: Alles auswählen

Ziel = mysheet.getCellByPosition(6,18)
als

Code: Alles auswählen

Ziel = mysheet.getCellByName("G19")
angeben?
ah… Ich hab ne ganze Weile gebraucht, bis ich die Frage verstanden habe.:

mit …getCellRangeByName( … ) kannst du sowohl einzelne Zellnamen "E4" als auch Zellbereichsangaben "D5:K39" auflösen
LO7.4.7.2 debian 12(bookworm) auf Raspberry4b 8GB (64bit)
LO7.6.3.2 flatpak debian 12(bookworm) auf Raspberry4b 8GB (64bit)

Ich Bins
Beiträge: 236
Registriert: Do 2. Aug 2018, 12:30

Re: Zellbereich mit absoluten Bezügen kopieren und einfügen

Beitrag von Ich Bins » Mi 17. Nov 2021, 21:06

Hallo karolus,
karolus hat geschrieben:
Mi 17. Nov 2021, 11:23
bsolute Bezüge (=$'Probe-2'.$D$127)
Darauf hätte ich eigentlich selbst kommen müssen und hätte mir viel Sucherei erspart.
Und danke auch für
karolus hat geschrieben:
Mi 17. Nov 2021, 11:23
…getCellRangeByName( … )
Vielen Dank
Ich Bins

An alle, die das LibreOffice-Forum nutzen:


Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

❤️ Vielen lieben Dank für Ihre Unterstützung ❤️

Antworten