Hallo,
dein Problem ist leider nur per Makro lösbar, da eine Zelle nur entweder einen Wert oder eine Formel enthalten kann.
Die Alternative wäre eine fortlaufende Buchhaltung, also für jede neue Einzahlung/Abhebung eine neue Zeile.
Die ganze Sache hat zwei Teile:
1. Die Schaltfläche als grafisches Element. Ist klar, wie das zeichnest?
2. Das Makro, dass dieser Schaltfläche zugeordnet wird. Ich gehe mal davon aus, dass du es dir schon einmal angesehen hast.
Ich habe es mal kommentiert (eine Zeile war überflüssig), damit du eher siehst wo du etwas anpassen müsstest:
Code: Alles auswählen
Sub Main (oevent)
'der Variable oevent wird beim Aufruf durch die Schaltfläche praktisch der Aufrufer übergeben
'oevent.source liefert die "Quelle" des Aufrufs
'oevent.source.model liefert in diesem Fall die Schaltfläche als Objekt
'Zugriff auf die aktuelle Tabelle (auf der sich die Schaltfläche befindet)
oTab=ThisComponent.CurrentController.ActiveSheet
'Zugriff auf die Zelle in der der Buchungsbetrag steht
quelle=oTab.getCellRangeByName("C4")
'Zugriff auf die Zelle in der die Summe steht
ziel=oTab.getCellRangeByName("C2")
'Abfrage der Aufschrift auf der Schaltfläche
'bei "Einzahlen" wird addiert, ansonsten subrahiert
if oevent.source.model.label="Einzahlen" then
ziel.value=ziel.value+quelle.value
else
ziel.value=ziel.value-quelle.value
end if
'setze Buchungsbetrag auf 0
quelle.value=0
End Sub
Dieses Makro müsstest du in deine Datei kopieren. Zunächst jedoch erst einmal ->Extras->Makros->Makros verwalten->Basic dort diene Datei auswählen und mit der Schaltfläche "Neu" ein neues Modul einrichten. In dieses kannst du nun das Makro hineinkopieren.
In den Eigenschaften der Schaltfläche ->Ereignisse->Aktion bestätigen wählst du dann dieses Makro aus, sodass es beim Klick auf die Schaltfläche aufgerufen wird.