User community support forum for Apache OpenOffice, LibreOffice and all the OpenOffice.org derivatives
https://forum.openoffice.org/en/forum/
Code: Select all
objCell.CellStyle = "My_Sophisticated_Cell_Style_With_Dozends_of_Attributes"Yes, of course -- but what the hell is VBOPENMSA wrote:...in macro VB.
Is it possible?
How?
Code: Select all
def word_formatter():
doc = XSCRIPTCONTEXT.getDocument()
sel = doc.CurrentSelection #works for one single selected Cell !!
cursor = sel.createTextCursor()
sentence = 'just three words'.split()
sizes = (12,20,15)
fonts = ('Carlito', 'Linux Biolinum Keyboard', 'Droid Sans')
for word, size, font in zip(sentence, sizes, fonts):
cursor = cursor.End
cursor.CharHeight = size
cursor.CharFontName = font
cursor.Text.insertString(cursor, '%s ' % word, False)changeOPENMSA wrote:Thanks you so much, it works!
Tip : change charWeight, charPosture after a insertControlCharacter (LINE_BREAK...)
Code: Select all
'%s 'Code: Select all
'%s\n'