IBM® Lotus® Symphony™ Spreadsheets indeholder en UNO-grænseflade (Universal Network Objects) til styring af automatisk beregning.
Du kan bruge grænsefladen til at aktivere eller deaktivere den automatiske beregningsfunktion.
UNO-grænsefladen til styring af
automatisk beregning er
XCalculatable.
- Du
kan bruge XCalculatable::enableAutomaticCalculation(boolean
bEnabled) til at angive status for automatisk beregning. Angiv
værdien for parameteren
bEnabled
til True (sand) for at aktivere automatisk
beregning og False (falsk) for at
deaktivere automatisk beregning.
- Du kan bruge
XCalculatable::isAutomaticCalculationEnabled()
til at få den aktuelle status for automatisk beregning. Hvis automatisk
beregning er aktiveret i øjeblikket, er den returnerede værdi
True (sand).
Ellers er den returnerede værdi False
(falsk).
Følgende kode er et eksempel. Hvis automatisk
beregning er aktiveret i øjeblikket, vil kørsel af makroen deaktivere
automatisk beregning.
Ellers vil kørsel af makroen aktivere automatisk beregning.
Sub Main
Dim oDoc as Object
Dim enabled as Boolean
Set oDoc = StarDesktop.CurrentComponent
enabled = Not oDoc.isAutomaticCalculationEnabled
oDoc.enableAutomaticCalculation(enabled)
End Sub