[gelöst] Calc: Schaltfläche per Code inaktiv stellen

[Astev]

Der Code soll bewirken, dass die "Aktiviert"-Eigenschaft von "Schaltfläche 1" nach Betätigung eben dieser Schaltfläche auf "Nein" gesetzt ist.

Ist das möglich, wenn ja, wie würde der entsprechende Code lauten?

[mikele]

Hallo,
die Schaltflächen (genauer: ihr model) haben die Eigenschaft "Enabled". Setzt du diese auf False, ist sie nicht mehr zugänglich=ausgegraut.

[Astev]

Hallo mikele,

danke für die Antwort. Ich verstehe, was Du sagst, jedoch komme ich wegen mangelnder Kenntnisse nicht auf den korrekten Code - habe einige Schnipsel ausprobiert, die ich im Netz gefunden habe, bekomme jedoch immer Fehlermeldungen. Ich lade mal eine Datei hoch, um deutlich zu machen, was genau ich meine.
Wenn Du reinsiehst, findest Du die "Schaltfläche 1". Diese soll nach einem Klick darauf - während der Laufzeit - ausgegraut sein. Den Code, der das bewirkt, suche ich.

[mikele]

Hallo,
unter den Eigenschaften der der Schaltfläche wird zunächst dem Ereignis "Aktion bestätigen" das gewünschte Makro zugeordnet.
LO übergibt diesem Makro auch den Auslöser dieses Ereignisses (in meinem Makro in der Variable oevent gespeichert).
Per oevent.source.model kann ich nun auf das Model der Schaltfläche zugreifen:

Code: Alles auswählen

Sub button_gedrueckt (oevent)

	obutton=oevent.source.model
	obutton.enabled=false
	obutton.label="Schaltfläche inaktiv"
	msgbox "Die Schaltfläche wurde gerade inaktiv geschaltet"
	obutton.enabled=true
	obutton.label="Schaltfläche aktiv"
	

End Sub

[Astev]

Allerbesten Dank, hast mir SEHR weitergeholfen!