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] Suchen - finden und Zell-Adresse auslesen

Alles zur Programmierung im LibreOffice.
Benutzeravatar
karolus
Beiträge: 2170
Registriert: Fr 10. Dez 2010, 10:01

Re: Suchen - finden und Zell-Adresse auslesen

Beitrag von karolus » Sa 11. Dez 2021, 12:42

Möchtest du wieder einmal ein eh schon absurdes Problem auf noch absurdere Weise lö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: Suchen - finden und Zell-Adresse auslesen

Beitrag von Ich Bins » Di 14. Dez 2021, 17:49

Zum absurden Problem nun auch noch ein absurdes Beispiel.
Beispiel_37280.ods
(28.83 KiB) 211-mal heruntergeladen

mikele
Beiträge: 1642
Registriert: Mo 1. Aug 2011, 20:51

Re: Suchen - finden und Zell-Adresse auslesen

Beitrag von mikele » Di 14. Dez 2021, 20:18

Hallo,
Ich brauche jedoch den Spaltenbuchstaben L damit ich in der Zelle L31 in der Formel =AUFRUNDEN(SUMME(INDEX($GTZ.$C:$GTZ.$C;VERGLEICH($K$26;$GTZ.$A:$GTZ.$A;0)):INDEX($GTZ.$C:$GTZ.$C;VERGLEICH($K$27;$GTZ.$A:$GTZ.$A;0)));0)
aus den beiden $K$26 je $L$26 machen kann.
Warum?
Wenn du die Formel an der Stelle mit relativen Adressen versiehst, kannst du sie einfach nach rechts ziehen oder kopieren.

Code: Alles auswählen

=AUFRUNDEN(SUMME(INDEX($GTZ.$C:$GTZ.$C;VERGLEICH(K26;$GTZ.$A:$GTZ.$A;0)):INDEX($GTZ.$C:$GTZ.$C;VERGLEICH(K27;$GTZ.$A:$GTZ.$A;0)));0)
Gruß,
mikele

mikele
Beiträge: 1642
Registriert: Mo 1. Aug 2011, 20:51

Re: Suchen - finden und Zell-Adresse auslesen

Beitrag von mikele » Di 14. Dez 2021, 20:47

Hallo,
das Kopieren kann man auch per Makro machen. Wenn die Zellen gleich formatiert sind per .copyRange ansonsten am einfachsten per Dispatch-Befehl.
Gruß,
mikele

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

Re: Suchen - finden und Zell-Adresse auslesen

Beitrag von Ich Bins » Di 14. Dez 2021, 21:22

Hallo mikele,

vielen Dank!
mikele hat geschrieben:
Di 14. Dez 2021, 20:18
an der Stelle mit relativen Adressen
Ich bin baff, genau das war die Lösung und ja, ich war der Meinung die Formel manipulieren zu müssen.
Mit meinem Makro werden zwischen den Bereichen K2:K35 und L2:L35 leere Zellen eingefügt in die anschließend die Kopie von K2:K35 eingefügt wird.
Aus der relativen Adresse K26 wird dadurch in Spalte L L26. :-)

Aber dennoch würde ich gerne noch wissen wie man über

Code: Alles auswählen

oFlagAddress  = oFound.CellAddress
oColumn = oFlagAddress.Column ' oColumn enthält 11 
L erhalten kann?

Den zu kopierenden Bereich pfriemle ich über die oColumn 11 zusammen.

Viele Grüße
Ich Bins

mikele
Beiträge: 1642
Registriert: Mo 1. Aug 2011, 20:51

Re: Suchen - finden und Zell-Adresse auslesen

Beitrag von mikele » Di 14. Dez 2021, 22:33

Hallo,
solange column kleiner als 26 ist, kannst du einfach chr(65+column) nehmen, um den Buchstaben zu erhalten.
Du kannst aber auch die Spaltenbezeichnung auslesen:
oFound.Columns.ElementNames(0)
Gruß,
mikele

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

Re: Suchen - finden und Zell-Adresse auslesen

Beitrag von karolus » Mi 15. Dez 2021, 03:25

Ich bin baff, …
……
Aus der relativen Adresse K26 wird dadurch in Spalte L L26
ich bin auch baff, insbesondere weil wir das Thema in den letzten 4-5 Wochen schon mehrmals durchgekaut hatten
viewtopic.php?f=6&t=37209&p=95475#p95477
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: Suchen - finden und Zell-Adresse auslesen

Beitrag von Ich Bins » Fr 17. Dez 2021, 10:49

Hallo mikele,
mikele hat geschrieben:
Di 14. Dez 2021, 22:33
Du kannst aber auch die Spaltenbezeichnung auslesen:
oFound.Columns.ElementNames(0)
Vielen Dank

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