Visning af ark navn i regneark [LØST]

[Jens Præst]

Jeg kunne godt tænke mig at få vist ark navnene som en slags indholdsfortegnelse i regnearket.
jeg kender formlerne for at vise antal ark og aktuelt ark nummer ARK() og ANTAL.ARK(), men kan jeg få adgang til de navne jeg har givet til de enkelte ark????

[Jens S]

Hej
Jeg har nogle makroer du kan bruge:

Code: Select all

Function SHEETLIST()    'indtastes som matrix-formel evt med TRANSPONER
   SHEETLIST = thisComponent.getSheets.getElementNames()
End Function 

og

Code: Select all

sub calc_allSheetNamesHyperlinks
outputSheet = ThisComponent.Sheets(0)
allElements = ThisComponent.Sheets.ElementNames

	for i = LBound(allElements) to UBound(allElements)
		oCell = outputSheet.getCellByPosition(0,i) 'indsættes i A1 og nedad
		oText = oCell.getText()
		oLink = ThisComponent.createInstance("com.sun.star.text.TextField.URL")
		oLink.URL = "#" & allElements(i)
		oLink.Representation = allElements(i)
		oCell.insertTextContent(oText.createTextCursor(),oLink,True)
	next i

end sub

Du kan også bruge funktionen CELLE til at give dig oplysning,
=CELLE("Filename";A1)

mvh
Jens

[Jens Præst]

Fint det gør hvad jeg har behov for

mange tak