🍀 Das LibreOffice Forum braucht HEUTE Ihre Hilfe! 🍀
❤️ Spenden Sie jetzt und sichern Sie die Zukunft unseres LibreOffice-Forums ❤️
Ihre Spende hilft, die Community offen, werbefrei (bei Registrierung) und lebendig zu halten. Vielen lieben Dank!

🙏 DANKE >> << DANKE 🙏

>> Das LibreOffice-Forum lebt von Ihnen – und von vielen Experten, die freiwillig und kostenlos ihr Wissen teilen.<<
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

Zellen verbinden mit jeweligem Format erhalt

CALC ist die Tabellenkalkulation, die Sie immer wollten.
Antworten
olliisit
Beiträge: 3
Registriert: Mi 22. Apr 2015, 18:49

Zellen verbinden mit jeweligem Format erhalt

Beitrag von olliisit » Mi 22. Apr 2015, 19:04

Hallo zusammen .

Habe eine Tabelle wo in 3 Spalten jweils 1 Alphanumerisches Zeichen steht.
Die sind teilweise mit unter oder überstrich oder beidem.

Ich möchte pro zeile diese Spalten zusammenfügen.

Wie kriege ich das hin , daß die die Formatierung exact so bleibt ?.

Gesamtgröße :ca~ 15 000 Zeilen

Verketten: Geht nicht , weil nur für Text
Zelle verbinden über Menüfunktion: Geht nicht weil formatierung der 1 spalte übernommen wird

Gibt es eine Sonder oder Makro lösung ?.

Bilder zeigen mal Beispielhaft Ausgangs & Wunsch situation
Dateianhänge
wunsch_bsp
wunsch_bsp
002a.jpg (7.24 KiB) 2871 mal betrachtet
ist_bsp
ist_bsp
002.jpg (7.98 KiB) 2871 mal betrachtet

Benutzeravatar
karolus
* LO-Experte *
Beiträge: 2712
Registriert: Fr 10. Dez 2010, 10:01

Re: Zellen verbinden mit jeweligem Format erhalt

Beitrag von karolus » Do 23. Apr 2015, 10:04

Hallo
Falls nur die Formatattribute Unterstreichung und Überstreichung benötigt werden geht folgendes:

Code: Alles auswählen

def concat_format_string(*_):
    doc = XSCRIPTCONTEXT.getDocument()
    sel = doc.CurrentSelection
    for r in range(sel.Rows.Count):
        writecell = sel.getCellByPosition(0,r)
        writecursor = writecell.createTextCursor()
        writecursor.gotoEnd(False)
        for c in range(1, sel.Columns.Count):
            readcell = sel.getCellByPosition(c,r)
            string = readcell.String
            writecursor.CharOverline = readcell.CharOverline
            writecursor.CharUnderline = readcell.CharUnderline
            writecursor.setString(string)
            writecursor.gotoEnd(False)
        sel.getCellRangeByPosition(0, r, c, r).merge(True)
 
Den gewünschten Bereich vorher markieren.
( Ja, das ist python !! )
LO25.2.x.y debian 13(trixie) auf Raspberry5 8GB (64bit)
LO25.8.x.y flatpak debian 13(trixie) auf Raspberry5 8GB (64bit)

Rocko
* LO-Experte *
Beiträge: 1336
Registriert: Sa 2. Jul 2011, 11:12

Re: Zellen verbinden mit jeweligem Format erhalt

Beitrag von Rocko » Do 23. Apr 2015, 10:32

nikki hat geschrieben:Calc kennt keine Zeichenformate (wie Writer), sondern nur Zellformate.
Wenn du statt "-formate" deine Aussage änderst in "-vorlagen" stimmt deine Aussage; denn du kannst einzelne Zeichen in einer Zelle durchaus händisch formatieren.

Doppelklick auf eine Zelle - Zeichenauswahl markieren - Kontextmenü "Zeichen"
Hast du schon mal einen Blick in die Writer-FAQ und in die Calc-FAQ des Forums geworfen?
Für jeden vor dem Beginn seiner Seminararbeit ein unbedingtes MUSS: http://openoffice-uni.org/

Benutzeravatar
karolus
* LO-Experte *
Beiträge: 2712
Registriert: Fr 10. Dez 2010, 10:01

Re: Zellen verbinden mit jeweligem Format erhalt

Beitrag von karolus » Do 23. Apr 2015, 11:46

Ergänzend

Laufzeit des Codes oben bei 15000*3 (Zeilen|Spalten) ca. 20 Min

zusätzlich mit

Code: Alles auswählen

    doc.lockControllers() 
am Anfang und:

Code: Alles auswählen

    doc.unlockControllers() 
am Ende ca. 14Min!
LO25.2.x.y debian 13(trixie) auf Raspberry5 8GB (64bit)
LO25.8.x.y flatpak debian 13(trixie) auf Raspberry5 8GB (64bit)

olliisit
Beiträge: 3
Registriert: Mi 22. Apr 2015, 18:49

Re: Zellen verbinden mit jeweligem Format erhalt

Beitrag von olliisit » So 26. Apr 2015, 20:15

Hallo an alle ,

Ich probier den Code mal aus und werde berichten.

Dank schonmal bis hierhin

olliisit
Beiträge: 3
Registriert: Mi 22. Apr 2015, 18:49

Re: Zellen verbinden mit jeweligem Format erhalt

Beitrag von olliisit » Di 28. Apr 2015, 22:27

Funktioniert einwandfrei !

Tausend Dank an @karolus

und alle anderen für die Unterstützung


An alle, die das LibreOffice-Forum gern nutzen:
Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das laufende.
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