Split cells programmatically

How do I split cells in a row? I have multiple merged cells in the row and I would like to split all of them at once programmatically. Manually, I can select the row and right click and select split option. To merge the cells I was able to do the following :

P_CellRange = P_objSheet.getCellRangeByPosition(0, 0, 100, 0)
P_CellRange.Merge(True)

LibreOffice 5.0.2.2 | Using LibreOffice Basic in Calc application

Think about True and False

Hi

You can use something like (here for Row 1 in Sheet1):

Sub MySplit

dim oSheet as object

oSheet = thiscomponent.sheets.getByName("Sheet1")
oSheet.rows.getByIndex(0).merge(false)

End Sub

Regards