Ich hab Version:
1.11.9.0

Das kann ich z.b. Problemlos kompilieren:

Dim a As Integer
Dim b as Integer

a= 2.25465

b = a * -1

Das funktioniert...

Das mit dem Umweg war auch mein Tipp werds jetzt testen.

Was ich noch prbioert hab ist, dass ich zur sicherheit Kettenspeedlinks in ein INteger umwandle mittels:

Bei Kette_l_bwd = Int(Kettenspeedlinks) * -1
Da kommt aber wieder StoreBit error, der andere Fehler ist dann weg...