Werner Tietz schrieb: > Hallo > Folgende Variante eignet sich auch für Textinhalte: > > Sub gleiche_verbinden_flipflop > odoc = thisComponent > with odoc.sheets(0) '1.Tabellenblatt > iz = 0 : ez = 1 > do until .getcellbyposition(0, iz).string = "" 'bis zur 1.Leerzelle in Sp.A > if .getcellbyposition(0,iz).string <> .getcellbyposition(0,ez).string then > oBereich = .getCellRangeByPosition(0,iz,0,ez-1) > oBereich.merge( not oBereich.getIsMerged() ) > iz = ez > end if > ez = ez + 1 > loop > end with > End Sub
Klasse! :) Danke. Klappt sehr gut. Update: http://borumat.de/+temp/openoffice/simon-barber-work2.ods Eine Bitte noch: Könntest Du vielleicht die Stelle im Makro kennzeichnen, wo man weitere Spalten ergänzen kann, auf die sich das Makro auswirken soll? Sehr schön BTW, dass das Makro sich auf Zahlen /und/ Text auswirkt. Eine Sache fällt mir noch auf: Wechselschalter wie z.B. der für "Fett" oder "Kursiv" verhalten sich bei gemischt formatierten Inhalten so, dass dem ganzen Bereich die gleiche Formatierung zugewiesen wird. Das geht zur Zeit mit Deinem Makro nicht. Andreas -- OOo 3.0.1 http://borumat.de/openoffice-writer-tipps --------------------------------------------------------------------- To unsubscribe, e-mail: users-unsubscr...@de.openoffice.org For additional commands, e-mail: users-h...@de.openoffice.org