Bart Aimar ha scritto:

Salve a tutti,

ho un problema che non riesco a risolvere...

Con il mio Ultimus mi sono trovato nella necessità di rifare
delle somme su una tabella calc mediante delle macro.

Ho risolto bene tutti i problemi relativi al reperimento delle
celle da sommare e alla fine (facendola breve) con del codice analogo a questo:

Sub Main
oSheet = ThisComponent.currentController.activeSheet
sFormula = "=SOMMMA(9;" & "A" & 1 & ":" & "A" & 5 & ")"
oSheet.GetCellByPosition(0 , 7).Formulalocal = sFormula
End Sub
Ciao Bart
devi scrivere le formule in inglese e quando la carichi nella cella non usare il "local" (che serve a localizzare la formula)
Ossia:
sFormula = "=SUM(9;" & "A" & 1 & ":" & "A" & 5 & ")"
oSheet.GetCellByPosition(0 , 7).Formula = sFormula

Cioa Guido M

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Rispondere a