On click in OpenOffice

[Karolus]

Hallo

Code: Alles auswählen

sub A1_plus_eins
odoc = thiscomponent
osheet = odoc.sheets(0) '1.Blatt
'oder:
'osheet = odoc.sheets().getbyname("Tabelle1")
osheet.getcellrangebyname("A1").value =_
osheet.getcellrangebyname("A1").value + 1
end sub

http://de.ooo-info.org/workshops/einsti ... m+Dokument
Kapitel: Quellcode..
http://www.ooowiki.de/MakrosMitEinemKlick
Gruß Karo

[komma4]

Ansicht>Symbolleisten>Formular-Steuerelemente
Letztes Symbol "Weitere Steuerelemente"

Nehme "nummerisches Feld" und ziehe mit der Maus die Grösse der Schaltfläche auf.

Dann rechte Maustaste>Kontrollfeld...
Karteireiter "Daten">verknüpfte Zelle>A1
Karteireiter "Allgemein">Drehfeld>Ja
evtl. Formatierung (Nachkommastellen), min./max. Wert anpassen.

Hift Dir das?