IBM® Lotus® Symphony™ Spreadsheets -ohjelma tarjoaa UNO-liittymän (Universal Network Objects) automaattisen laskennan hallitsemista varten.
Liittymän avulla voit ottaa käyttöön tai poistaa käytöstä automaattisen laskennan funktion.
Automaattisen laskennan hallintaan käytetty UNO-liittymä on
XCalculatable.
- Jos haluat määrittää automaattisen laskennan tilan, käytä funktiota XCalculatable::enableAutomaticCalculation(boolean bEnabled).
Aseta bEnabled-parametrin arvoksi Tosi, jos haluat ottaa automaattisen laskennan käyttöön
ja Epätosi, jos haluat poistaa automaattisen laskennan käytöstä.
- Jos haluat tietää automaattisen laskennan nykyisen tilan, käytä funktiota XCalculatable::isAutomaticCalculationEnabled(). Jos automaattinen laskenta on käytössä, palautettava arvo on Tosi.
Muutoin palautettava arvo on Epätosi.
Seuraavassa esitellään esimerkkikoodi. Jos automaattinen laskenta on käytössä, makron ajaminen ottaa sen pois käytöstä.
Muutoin makron ajaminen ottaa automaattisen laskennan käyttöön.
Sub Main
Dim oDoc as Object
Dim enabled as Boolean
Set oDoc = StarDesktop.CurrentComponent
enabled = Not oDoc.isAutomaticCalculationEnabled
oDoc.enableAutomaticCalculation(enabled)
End Sub