I would like to ask for help! I have a table where I want to adjust the text spacing to the length of the words. I have a well-functioning macro, but unfortunately it is very slow. Do you have any ideas to possibly speed it up? Thanks
for x = 0 to 20
for y = 0 to 40
hossz = len(ThisComponent.Sheets.getbyname("Munkalap1").getcellbyposition(x, y).string)
meret = ThisComponent.Sheets.getbyname("Munkalap1").getColumns.getByIndex(x).width
if hossz > 0 then
k = meret/hossz/2.5
ThisComponent.Sheets.getbyname("Munkalap1").getcellbyposition(x, y).createtextcursor.charkerning = - k
end if
next y
next x
Edit: Changed subject, was CharKerning Make your post understandable by others -- MrProgrammer, forum moderator |