Hallo liebe Gemeinde,
nach langer Pause hab ich mich wieder einmal an etwas umfangreichere Tabellen herangetraut und schon stoße ich an meine Grenzen.
Ich langer Suche im Netz hoffe ich da ich hier Hilfe bekomme.
Also:
Ich habe einen Makro Dialog in calc erstellt und unter anderem 4 Checkboxen auf dem „Formular“ Platziert.
Nun möchte ich, wenn eine Checkbox angeklickt ist, das in meine Tabelle ein X in ein bestimmtes Feld eintragen wird.
Was muss ich also im Makrocode schreiben oder ist hier im Forum so etwas ähnliches schon vorhanden?
Mir reichen auch Codeschnipsel.
Danke
Peter
🙏 Bitte helfen Sie uns das LibreOffice Forum zu erhalten. 🙏
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🍀 Wir hoffen auf Ihre Unterstützung - vielen Dank!🍀
>> Dank Ihrer Unterstützung -> Keine Werbung für alle registrierten LibreOffice-Forum User! <<
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗
Checkbox im Dialog abfragen
Re: Checkbox im Dialog abfragen
Hallo,
wenn ich dich richtige verstehe befinden sich die Checkboxen im Dialog.
Ich würde in den Eigenschaften der Boxen unter "Zusatzinformation" die Zelle eintragen, in die das X eingetragen werden soll.
Dann weist du dem Ereignis der Checkbox "Status geändert" folgendes Makro zu:
wenn ich dich richtige verstehe befinden sich die Checkboxen im Dialog.
Ich würde in den Eigenschaften der Boxen unter "Zusatzinformation" die Zelle eintragen, in die das X eingetragen werden soll.
Dann weist du dem Ereignis der Checkbox "Status geändert" folgendes Makro zu:
Code: Alles auswählen
sub check (oevent)
'Identifikation der Checkbox, die das Ereignis ausgelöst hat
ocb=oevent.source.model
'Auswahl des aktuellen Tabellenblattes
oTab=ThisComponent.CurrentController.ActiveSheet
'.state enthält den Status der Checkbox
'.tag enthält die Zusatzinformation, hier die gewünschte zelle
if ocb.state=1 then
oTab.getCellRangeByName(ocb.tag).string="x"
else
oTab.getCellRangeByName(ocb.tag).string=""
end if
end sub
Gruß,
mikele
mikele
An alle, die das LibreOffice-Forum gern nutzen und unterstützen wollen:
Bitte helfen Sie uns mit 7 Euro pro Monat.
Durch Ihren Beitrag tragen Sie dazu bei, unsere laufenden Kosten für die kommenden Monate zu decken.
Unkompliziert per Kreditkarte oder PayPal.
Als ein kleines Dankeschön werden Sie im LO-Forum als SUPPORTER gekennzeichnet.