Hallo Kornelia,
>
> hab Folgendes probiert:
> oDoc = ThisComponent
> oSheet = oDoc.Sheets.getByName("Tabelle1")
> oDrawpage = oSheet.Drawpage
> oForm = oDrawpage.Forms.GetByName ("Standard")
>
> Dlg = oDoc.GetCurrentController ()
> i = 1
> WHILE i < 34
> oOption = oForm.GetByName ("CheckBox" & CStr(i))
> Ctrl = Dlg.GetControl (oOption)
> Ctrl.Model.Enabled = True
> i = i + 1
> WEND
>
Ich würde Dlg von vor der Schleife in die Schleife nehmen. Irgendwo muss ja
anscheinend eine Information in der Schleife fehlen, die notwendig jedes Mal
neu belegt wird. Und Dlg scheint die Variable zu sein, die gesucht wird.
Vielleicht schaut da noch einmal jemand anderes drauf, der mit Makros mehr
Erfahrung hat.
Gruß
Robert
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]