OpenOffice.info

[color=#008000]Ansicht>Symbolleisten>Formular-Steuerelemente[/color]
Letztes Symbol "Weitere Steuerelemente"

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

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

Hift Dir das?

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

Hallo
[code]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[/code]
[url]http://de.ooo-info.org/workshops/einstieg.html#Schaltfl%C3%A4che+im+Dokument[/url]
[url=http://www.ooowiki.de/MakrosInstallieren]Kapitel: Quellcode..[/url]
[url]http://www.ooowiki.de/MakrosMitEinemKlick[/url]
Gruß Karo