Probleme mit Makro

[turtle47]

Hallo Mücke,

folgender Code sollte Deine Anforderung erfüllen:

Code: Alles auswählen

Sub Wert_abziehen
oCell1 = thisComponent.sheets().getbyname("Tabelle1").getcellrangebyname("A1").value 'lesen
NewValue = oCell1 -100
thisComponent.sheets().getbyname("Tabelle1").getcellrangebyname("A1").Value = NewValue 'schreiben
End Sub

Hilft das weiter?

Jürgen