Hi Marc
Range(Foo).select
If ActiveCell.MergeCells Then
MergedInfo = ActiveCell.MergeArea
MergedValue = MergedInfo(1, 1)
End If
for Libreoffice basic
assuming a calc sheet, with some content in A1 and B1
Sub Main
doc = thisComponent ' the current document
curSheet = doc.CurrentController.activeSheet
cellRange = curSheet.getCellRangeByName("A1:B1")
cellRange.merge(true)
if cellRange.isMerged then
cellContent = cellrange.dataArray
endif
anArray = cellContent(0)
print join(anArray, " ---- ")
End Sub
did you have a look there
http://wiki.openoffice.org/wiki/Documentation/BASIC_Guide
http://wiki.openoffice.org/wiki/Documentation/DevGuide/OpenOffice.org_Developers_Guide
i assumle you already identified this ressource (IDL reference)
http://api.libreoffice.org/docs/common/ref/com/sun/star/module-ix.html
HTH
laurent
_______________________________________________
LibreOffice mailing list
[email protected]
http://lists.freedesktop.org/mailman/listinfo/libreoffice
