OpenOffice.info

Sub Main(rueck)
	With ThisComponent.CurrentController.ActiveSheet
		.getCellRangeByName("A1").FormulaLocal = rueck.Source.state
	End With 
End Sub

verbinde die Checkbox nicht mit einer Zelle sondern setze den Zellwert per Makro zugeordnet dem Ereignis "Status geändert" der Checkbox. Dann sollte das die Checkbox enthaltene Tabellenblatt beliebig kopierbar sein.

[code]Sub Main(rueck)
With ThisComponent.CurrentController.ActiveSheet
.getCellRangeByName("A1").FormulaLocal = rueck.Source.state
End With
End Sub
[/code]



Gruß
Stephan

Hallo,
wenn ich es recht verstehe, kopierst du ein Tabellenblatt mit Checkboxen.
Aus irgendwelchen Gründen ist die verbundene Zelle allerdings absolut adressiert (unabhängig, wie es eingegeben wird).
Das wird sich nicht ändern lassen. Also entweder du kannst auf die Verbindung zu einer Zelle verzichten oder du korrigierst du Zelladressierung (per Makro am schnellsten).

Hallo,
[quote]Checkboxen setzen mit .State = 1/0 oder Verbundene Zelle.Value = 1/0 setzt auch
gleichzeitig die CheckBoxen in anderen Tabellenblättern.[/quote]
wenn alle Checkboxen mit derselben Zelle verbunden sind logischerweise.
[quote]Auch mit x=getRangeAddress().sheet in sheets.getByIndex(x) keine Änderung[/quote]
Was hat das mit den Checkboxen zu tun?
[quote]oder kann Tabellenblatt beim Kopieren komplett gesperrt werden?[/quote]
???

Hallo,
Checkboxen setzen mit .State = 1/0 oder Verbundene Zelle.Value = 1/0 setzt auch
gleichzeitig die CheckBoxen in anderen Tabellenblättern.
Auch mit x=getRangeAddress().sheet in sheets.getByIndex(x) keine Änderung
Gibt es andere Möglichkeit oder doch mit x=getRangeAddress() in Macro ?
oder kann Tabellenblatt beim Kopieren komplett gesperrt werden?