Seite 1 von 1
+1 Schaltfläche/(klickzähler)
Verfasst: Do, 06.01.2011 17:46
von Mani
Hallo Leute!
Ich möchte eine Schaltfläche machen, wenn ich auf sie drücke das in einer Anderen Zelle ein wert dazugezählt wird.
Leider hab ich keine Erfahrung im Makros schreiben kann mir wer eine Einführung in das Thema Empfehlen?
Lg Mani
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Do, 06.01.2011 18:22
von clag
Hallo Mani,
sieh dir einmal
dieses Thema an, da wurde schon einmal etwas sehr ähnliches gewünscht.
Das dort angewendete Makro könnte auch für dich brauchbar sein...
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Do, 06.01.2011 21:39
von Mani
Danke das ist genau das richtige sogar für den selben Zweck
Nur leider muss ich das für jeden Posten das Makro erstellen und umschreiben und mit der Taste verknüpfen,
geht das irgendwie einfacher?
Lg Mani;
PS: im Anhangg ist noch ein kleiner Ausschnitt meiner Arbeit
Unbenannt 1.ods
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Fr, 07.01.2011 07:24
von clag
Hallo Mani,
vielleicht gefallen dir "Drehfelder" besser!?
guckst du dir das Beispiel mal an.....
edit:
link war tot, Datei neu hochgeladen
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Fr, 07.01.2011 08:54
von Stephan
geht das irgendwie einfacher?
eigentlich nicht wesentlich, da du ja für jede Funktion den unterschiedlichen Code irgendwie brauchen wirst.
Du kannst höchstens allen Code in ein Makro packen und über den Event z.B. den namen der auslösenden Schaltfläche ermitteln und über SElect-Case zum zur SChaltfläche gehörenden Code verzweigen:
Code: Alles auswählen
sub plus_n(oEvent)
Select Case oEvent.Source.Model.Name
Case "Schaltfläche 1"
'tue was Anderes:
'...
Case "Schaltfläche 2"
'tue das:
myDoc = thisComponent
' mySheet = myDoc.sheets(0) ' entspricht Tabelle1
mySheet = myDoc.Sheets().getByName("Tabelle1")
' mycell=mysheet.getCellByPosition(1,1) ' entspricht B2
mycell=mysheet.getCellRangeByName("$D$2")
mycell.value = mycell.value + 1
Case "BlaBla"
'und noch was zu tun:
'...
End Select
end sub
Gruß
Stephan
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Fr, 07.01.2011 11:00
von clag
Hallo Mani,
so nun habe ich ein
universal_plus Makro für dich
Das nur einmal benötigt wird und von beliebig vielen Schaltflächen aufgerufen werden kann und in jeweils einer spezifizierten Zelle etwas addiert, einzige Bedingung ist der Schaltflächen Name muss die Zieladresse jener Zelle sein, zu deren Wert etwas addiert werden soll.
Also die "
Schaltfläche 1" zB umbenennen in "
D2" oder "
AX153" oder jede andere gültige Zell-Adresse.
Dann viel Spaß damit ......
edit:
link war tot, Datei neu hochgeladen
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Fr, 14.01.2011 18:25
von Mani
Hallo Clag!
Leider kann ich dein universal_plus.ods nicht mehr Downloaden,
kannst du es bitte nocheinmal Hochladen?
@ Stephan leider verstehe ich nur Bahnhof
Lg Mani
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Fr, 14.01.2011 20:24
von clag
Hallo Mani,
Dateien sind nun wieder verfügbar
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Mo, 17.01.2011 14:32
von Mani
Hallo
Wie funktioniert das mit der Button Belegung,
es gibt da zwei Möglichkeiten einmal Kontrollefeld... und und einmal Formular...
für was gibt es die zwei Möglichkeiten?
Lg mani
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Di, 18.01.2011 09:33
von clag
Hallo Mani,
wenn du etwas genauer hin schaust, sollte dir eigentlich auffallen, dass nur im "Kontrollfeld" für den jeweiligen Button beim Namen Bezeichnungen wie "Zelladressen" also zB "
D3" auftauchen!
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Di, 18.01.2011 21:03
von Mani
Hallo Clag
ich meinte eher mit Makro belegen da gibt es mehrere möglichkeiten
mich würde interessieren warum du es so gemacht hast
lG Manuel
Re: +1 Schaltfläche/(klickzähler)
Verfasst: Di, 18.01.2011 22:07
von clag
Hallo Mani,
die Zuordnung eines Makro zu einer Schaltfläche erfolgt im "Kontrollfeld" bei den Ereignissen,
üblicherweise "Aktion ausführen" und das gewünschte Makro zuordnen ......
Unter Formular brauchst du nichts anzugeben......