Bereichs- & ZellNamen ausdrucken

[Lupo121205]

Hi, gibt es eine Möglichkeit, erstellte Bereichsnamen & Referenzen
in Listenform auszudrucken?

Danke Wolf

[Stephan]

z.B. erstelle per Makro ein Tabellenblatt das die Bereichsnamen und Inhalte auflistet:

Code: Alles auswählen

Sub Main
	ThisComponent.Sheets.InsertNewByName("Bereiche",0)
	tmp = ThisComponent.NamedRanges
	blatt = ThisComponent.Sheets.getByName("Bereiche")
	blatt.getCellByPosition(0,0).String = "Name"
	blatt.getCellByPosition(1,0).String = "Inhalt"
	For i = 1 to tmp.Count
		blatt.getCellByPosition(0,i).String = tmp(i-1).Name
		blatt.getCellByPosition(1,i).String = tmp(i-1).Content
	Next i
End Sub

Gruß
Stephan

[Lupo121205]

Hi Stephan,
whouw, bin beeindruckt - Code kopiert, eingegeben und…
FUNKTIONIERT

Besten Dank Wolf

[Jörg]

Hallo, ich kann mich dem nur anschließen.

Gruß Jörg