Hallo,

Jörg Schmidt schrieb:
Ich kann 2 Möglichkeiten nennen:

*den Versuch das die Funktion auf Änderung des Blattnamens reagieren
soll, aufgeben und stattdessen den Blattnamen auf Änderung eines
Zellinhalts reagieren lassen:

Function Blattname(a)
On Error Resume Next
blatt = ThisComponent.CurrentController.ActiveSheet
blatt.name = a
End Function

das als Makro im Dokument an das Ereignis "Öffnen" gehängt funktioniert problemlos

*es mit Bordmitteln zu lösen:

Name:
TABELLENNAME

zugeordnet zu:
RECHTS(ZELLE("FILENAME");(LÄNGE(ZELLE("FILENAME"))-FINDEN("#";ZELLE("FIL
ENAME"))-1))

Das wirkt genau wie die ursprünglich geplante Funktion ohne Probleme beim Öffnen des Dokumentes. Danke für die Tipps!

Gruß
Heinz

--
OOo 2.1 unter Windows 2000

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Antwort per Email an