Komponent IBM®
Lotus® Symphony™ Spreadsheets udostępnia
interfejs uniwersalnych obiektów sieciowych (Universal Network Objects - UNO)
służący do zarządzania automatycznym obliczaniem. Za pomocą interfejsu można
włączyć lub wyłączyć funkcję automatycznego obliczania.
Interfejs UNO służący do zarządzania
automatycznym obliczaniem to
XCalculatable.
-
Aby ustawić status automatycznego obliczania, należy użyć metody
XCalculatable::enableAutomaticCalculation(boolean
bEnabled). W celu włączenia automatycznego obliczania dla parametru
bEnabled
należy ustawić wartość True, natomiast w celu
wyłączenia automatycznego obliczania - wartość
False.
- Aby uzyskać bieżący status automatycznego obliczania, należy
użyć metody
XCalculatable::isAutomaticCalculationEnabled(). Jeśli
automatyczne obliczanie jest włączone, zostanie zwrócona wartość True.
W przeciwnym razie wartość zwracana to False.
Poniższy kod to przykład. Gdy automatyczne obliczanie jest
włączone, uruchomienie makra spowoduje jego wyłączenie. W przeciwnym
razie uruchomienie makra spowoduje włączenie automatycznego obliczania.
Sub Main
Dim oDoc as Object
Dim enabled as Boolean
Set oDoc = StarDesktop.CurrentComponent
enabled = Not oDoc.isAutomaticCalculationEnabled
oDoc.enableAutomaticCalculation(enabled)
End Sub