uno, python scripting, macro management window & user experience
Laurent Godard
lgodard.libre at laposte.net
Thu Oct 25 07:10:11 PDT 2012
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
More information about the LibreOffice
mailing list