[gelöst] mehrere Schaltflächen ausblenden

[clag]

Hallo Kenner und Könner,

wie kann man mehrere oder auch alle Schaltflächen auf einem Calc Tabellenblatt aus bzw ein blenden, ohne jede Schaltfläche einzeln anzusprechen?

habe versucht diese zu gruppieren und die Gruppe ausblenden aber dann werden nicht alle Schaltflächen ausgeblendet sondern nur 2 von 4

Code: Alles auswählen

	oForm = mySheet.drawpage.forms.getbyindex(0)
	oControl = oForm.getByName("Gruppe 1")
	oControl.enablevisible = false

wie macht man das richtig?

[F3K Total]

Hi Clag,
so vielleicht?

Code: Alles auswählen

Sub S_SHOW_HIDE_BUTTONS
   mySheet = thiscomponent.Sheets.getbyname("Tabelle1")
   oForm = mySheet.drawpage.forms.getbyindex(0)
   for i = 0 to oForm.count - 1
       oControl = oForm(i)
       if oControl.supportsservice("com.sun.star.form.component.CommandButton") then
           oControl.enablevisible = not(oControl.enablevisible)
       endif
   next i
End Sub

Gruß R

[clag]

Hallo F3K Total,

Danke dir für deine Antwort

hmm da habe ich das mit dem gruppieren von Steuerelementen auf der "Drawpage" wohl irgendwie missverstanden !?
Aber was macht man denn sonst mit einer Gruppe außer gemeinsam die enthaltenen Einzelelemente anzusprechen und ggf einen Wert zuweisen ?

[F3K Total]

Hallo Clag,
positionieren z.B.

Gruß R

[clag]

ahhhhh ...

Danke