bedingte Formatierung + Zufallszahlen [basst schon gelöst]

[Blueonestyle]

Hi Leute,

Ich hab eine kleine Makro-Frage. Ich hab in meiner Tabelle einige Zufallszahlen, die mittels eines Makros neu würfeln kann.
Das geschieht über den Befehl "dispatcher.executeDispatch(document, ".uno:CalculateHard", "", 0, Array())", der ja STRG+Shift+F9 entspricht.
Damit ich für bestimmte Zufallszahlen aufmerksamgemacht werde, habe ich bedingteFormartierungen für die entsprechenden Zufallszahlenzellen erstellt. Leider aktualisiert der Befehl zwar die Zahlen, überprüft aber die Bedinungen für die neuen Zahlen nicht.

Welche Befehl brauche ich dafür? Bitte helft mir.

Anbei mein gesamtes Makro:

Code: Alles auswählen

sub BerechneNeu
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:CalculateHard", "", 0, Array())


end sub

Moderation:
Thema nach OOo Basic und Java verschoben, wo alle Themen zur Basic-Programmierung hingehören.
lorbass, Mod

[F3K Total]

Moin,

Ich hab eine kleine Makro-Frage

... da hast du recht, ein kleineres Makro habe ich selten gesehen:

Code: Alles auswählen

Sub S_Calculate_New
    thiscomponent.calculate
End Sub

Beispiel, siehe unten.
Gruß R

[Blueonestyle]

Super, danke!

[Blueonestyle]

Sowas wie "gelöst" gibt es hier nicht, oder?

[F3K Total]

Doch,
gehe in deinen ersten Beitrag, ändern, und schreibe z.B.[gelöst] in die Kopfzeile.
Gruß R

[Blueonestyle]

So, muss mich nochmal melden.

Deine Lösung funktioniert leider nur bedingt: Die bedingten Formatierungen werden nur in den Zeilen aktualisiert, in denen Werte neu berechnet werden!
Ein Minimalbeispiel: