[Solved] Cell String with bold or italic parts

[VBandOoffice]

Hi all,
I've got a problem again: I need to format a cell string partly bold (or italic). If I put the string manually to the cell, this is simple: Mark a part of the string and click to bold or Format/Character/ and so on.
But how to build this kind of string by an Basic Macro? I tried to use XRay to an already formatted string - but failed to find a solution.

Thanks in advance,
VBandOoffice

[FJCC]

Here is an example of making the first 4 characters in cell A1 bold.

Code: Select all

  oSheets = ThisComponent.getSheets()
  oSheet1 = oSheets.getByName("Sheet1")
  oCellRangeByName = oSheet1.getCellRangeByName("A1")
  
  oText = oCellRangeByName.getText()
  oCurs = oText.createTextCursor()
  oCurs.gotoStart(FALSE)
  oCurs.goRight(4, True)
  oCurs.CharWeight = 150

[VBandOoffice]

Thank you very much FJCC!

by the way, if you want to switch to italic you have to change CharPosture to 2 (normal=0)

Best regards,
VBandOoffice