alle checkboxen auf FALSE

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: alle checkboxen auf FALSE

Re: alle checkboxen auf FALSE

von turtle47 » Mo, 05.04.2010 07:44

Hallo Spacerat,

hier mal ein Codebeispiel für das erste Tabellenblatt:

Code: Alles auswählen

Sub ResetMyCheckBoxes
	oForm = ThisComponent.Sheets().getbyName("Tabelle1").DrawPage.Forms.getByIndex(0)
	Anzahl = oForm.count
	for i = 0 to Anzahl-1
	oControl = oForm.ControlModels(i)
	if oControl.ServiceName = "stardiv.one.form.component.CheckBox"	then
	oControl.State = 0
	end if
	next i
End Sub
Viel Erfolg.

Jürgen

alle checkboxen auf FALSE

von spacerat » Di, 30.03.2010 23:22

aloha,

ich hab da ein kleines problem. ich hab mehrere checkboxen an verschiedenen positionen in calc und wollte jetzt oberhalb eine schaltflaeche anlegen die mir ALLE checkboxen auf FALSE setzt, unabhaengig davon ob die
schon auf FALSE stehen oder immer noch auf TRUE. allerdings krieg ich das zum verrecken nicht hin, ich hab mich jetzt schon "wuschig" gesucht und leider nur was fuer excel gefunden, was aber so in der form nicht in
open office klappt.

meine frage also, wie setzt ich das um, das sobald ich die schaltflaeche anklicke, alle checkboxen auf FALSE springen?

bin fuer jede hilfe dankbar ;)

gruss

spacerat

Nach oben