OpenOffice.info

[quote="erikafuchs"]Ergänzung:
Kann es sein, dass die Drawpages von Tabellendokumenten keine Ebenen besitzen?
Da das mit den Ebenen nicht geklappt hat, habe ich versucht eine neue DrawPage einzufügen. Bem Zählen habe ich aber festgestellt, dass es genausoviele Drawpages wie Tabellenblätter gibt. Das legt die Vermutung nahe, dass jedes Tabellenblatt auch nur eine Drawpage besitzt - kann mir dazu jemand was sagen?
Pit[/quote]

Ja "das" jemand heisst [url]http://extensions.services.openoffice.org/de/project/MRI[/url]

Sorry dafür!

[quote="erikafuchs"]... (aus dem Thomas Krum[color=#FF0000]m[/color]bein Buch):[/quote]

Krumbein heisst der Mann, Thomas Krumbein!

Ergänzung:
Kann es sein, dass die Drawpages von Tabellendokumenten keine Ebenen besitzen?
Da das mit den Ebenen nicht geklappt hat, habe ich versucht eine neue DrawPage einzufügen. Bem Zählen habe ich aber festgestellt, dass es genausoviele Drawpages wie Tabellenblätter gibt. Das legt die Vermutung nahe, dass jedes Tabellenblatt auch nur eine Drawpage besitzt - kann mir dazu jemand was sagen?
Pit

			dim oEbenen as object, oEbene as object, 
			dim oName as string
			oName = "Ebene1"
			oEbenen = ThisComponent.getLayerManager()
			if oEbenen.hasByName(oName) then
				oEbene = oEbenen.getByName(oName)
			else
				oEbenen.insertNewByIndex(oEbenen.getCount())
				oEbene = oEbenen.getByIndex(oEbenen.count-1)
				oEbene.name=oName
			end if

Helft mir doch bitte mal wieder:
Ich versuche auf der Drawpage meines Tabellendokuments eine Ebene einzufügen und habe den Code (aus dem Thomas Krummbein Buch):
[code] dim oEbenen as object, oEbene as object,
dim oName as string
oName = "Ebene1"
oEbenen = ThisComponent.getLayerManager()
if oEbenen.hasByName(oName) then
oEbene = oEbenen.getByName(oName)
else
oEbenen.insertNewByIndex(oEbenen.getCount())
oEbene = oEbenen.getByIndex(oEbenen.count-1)
oEbene.name=oName
end if[/code]
... das funktioniert nicht. Irgendwie klappt das mit "LayerManger" nicht.
Danke Pit