Salve a tutti,
sono anni che uso un pezzo di codice classico (Flags =
com.sun.star.sheet.CellFlags) per usi diversi; ma con la versione 3.1 di
OO pare ci siano degli inconvenienti e superato un certo numero di celle
(contenenti formule) OO si congela.
La cosa inoltre pare accadere non in modo lineare... nel senso che da
un'installazione all'altra pare si abbiano risultati diversi.
Questo è il codice incriminato:
Sub consolida
oSheet = ThisComponent.currentController.activeSheet
oCell = oSheet.GetCellbyPosition( 0, 0 )
oCursor = oSheet.createCursorByRange(oCell)
oCursor.GotoEndOfUsedArea(True)
aAddress = oCursor.RangeAddress
nEndRow = aAddress.EndRow
nEndCol = aAddress.EndColumn
oRange=oSheet.getCellRangeByPosition (0,0,240,nEndRow)
Flags = com.sun.star.sheet.CellFlags.FORMULA
aSaveData = oRange.getDataArray()
oRange.clearContents(Flags)
oRange.setDataArray( aSaveData )
aSaveData = oRange.getDataArray()
End Sub
Ho preparato una documento di prova con il codice già dentro e due tabelle.
Nelle tabelle ci sono i pulsanti e basta premerli...
http://aimar.mrjive.it/node/61
Potete aiutarmi per dei rapidi test?
Grazie
Bart
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
