Seite 1 von 1

Hyperlink: Adresse auslesen

Verfasst: Mo, 10.05.2010 20:06
von Concitus
Nabend,
Da ich von Excel auf OpenOffice umgestiegen bin und meine Tabellen nicht kompatibel sind brauche ich ein bisschen Hilfe.Ich sage jetzt schonmal danke.Danke :D

In Zelle A1-700 sind verlinkte Zellen,deren Adresse ich auslesen und in Zelle P1-700 darstellen möchte.In Excel habe ich das mit einer Function umgesetzt,in OpenOffice funktioniert dies aber nicht.

Gibt es eine Lösung dies auch in OpenOffice umzusetzen?Ich sage schonmal danke im vorraus.





LG Concitus/Alex

Re: Hyperlink: Adresse auslesen

Verfasst: Mo, 10.05.2010 21:24
von bst
Abend Alex,

B1: =EXTRACTHYPERLINK(1;1;ROW())

liest den Hyperlink aus A1. Nach unten kopierbar. Siehe auch:

http://www.stmoser.net/blog/2009/10/30/ ... ukationen/
http://www.oooforum.org/forum/viewtopic ... 0625#80625

cu, Bernd
--

Code: Alles auswählen

Function ExtractHyperLink(lSheet as Long, lCol as Long, lRow as Long) as String
	ExtractHyperLink = "– no Hyperlink –"
	fields = ThisComponent.Sheets.getByIndex(lSheet-1).getCellByPosition(lCol-1,lRow-1).getText().getTextFields()
	if fields.hasElements() then
		ExtractHyperLink = fields.getByIndex(0).URL
	endif
end function

Re: Hyperlink: Adresse auslesen

Verfasst: Mo, 10.05.2010 21:45
von Concitus
Ich danke dir für deine Hilfe aber irgendwas scheine ich falsch zu machen.
Ich habe in Zelle A1 meinen Link und in P1 die von dor angegebene Formel.Für den Code habe ich ein neues Modul erstellt und ihn rein kopiert.
Aber trotzdem bekomme ich den Fehler #Name?



LG

Re: Hyperlink: Adresse auslesen

Verfasst: Mo, 10.05.2010 22:34
von bst
Hi,

die Funktion muss wohl in ein Standard Modul. Siehe http://wiki.services.openoffice.org/wik ... _functions

Dann sollte das eigentlich auch funktionieren?

Die ersten beiden Parameter sind die Nummer der Tabelle und der Spalte, ab 1 zählend.

HTH, Bernd

Re: Hyperlink: Adresse auslesen

Verfasst: Di, 11.05.2010 13:57
von Concitus
Ich danke dir.Jetzt hab ich es auch endlich verstanden :D



LG