OpenOffice.info

Schön guten Tag, liebe Gemeinde.

Ich krieg es nicht gebacken, StarBasic zu verstehen, sorry . Deshalb bitte ich um eure Hilfe.

Also, ich habe 4 Spalten in denen Formatierte Hyperlinks drinstehen, die ich über "Verknüpfung zu externenen Daten" importiert habe. Nun möchte ich mir in 4 weiteren Spalten daneben per "Benutzerdefenierte Function" nur die Hyperlink-Adressen ausgeben lassen. Aber auch nur dann, wenn in einer anderen Zelle eine 1 drin ist. Also in etwa so: Wobei HyperAdresse die "Benutzerdefenierte Function" wäre.

Im ganz groben müsste ja die Function dann etwa so aussehen, aber auch nur im ganz groben. Denn ich weiss nicht wie ich der Function Relative Bezüge, per Row und Colum, erklären soll. Kurz und gut, ich versteh gar nichts.
Den eingerückten Teil der Formel habe ich hir im Forum gefunden, den Winfried mal gepostet hatte um den Hyperlink in eine "MessageBox" auszugeben.
Meine Frage lautet also jetzt:
Wie muss ich den oben genannten Code ändern, damit die Function HyperAdress mir innerhalb der 4 Spalten den Hyperlink ausgibt?
Ach ja, die Function soll nur im 1. Tabellenblatt ausgeführt werden.

Ich hoffe ich hab mich verständlich genug ausgedrückt, ansonsten müsst ihr noch mal nachfragen.

Für eure Bemühungen bedanke ich mich schon mal recht herzlich, und wünsche euch noch einen schönen Sonntagabend .


Gruß
balu

Hallo Balu
Erklär das nochmal mit ganz anderen Worten, zumindest ich versteh gerade nur Bahnhof!
( 'Hyperlink' ist nicht 'Verknüpfung zu externen Daten' )

Gruß Karo

Hallo Karo,

na dann will ich mal versuchen Schaffner zu spielen

Also, wenn man eine xterne Tabelle verknüpft, z.B. von http://www.nba.com/playerfile/dirk_nowi ... stats.html, dann sind ja manchmal einige Daten als Hyperlinks eingefügt. Das erkennt man ja daran, dass der dementsprechende Zelleintrag einen Grauen Hintergrund mit einer Blauen Schrift enthält, das ist der Hyperlink.

Hab da mal ein kleines Beispiel angehängt, von der besagten Seite.

Wie zu ersehen ist, steht da z.B. Milwaukee. Aber dahinter verbirgt sich der Hyperlink http://www.nba.com/bucks/. Und genau diesen will ich auslesen. Jetzt verständlicher


Gruß
balu

Hallo mein Freund Balu,

die Function könnte folgendermassen aufgebaut sein: Aufgerufen wird sie wie folgt: Die Prüfziffer "1" steht in Zelle "D2"!

Die Aktualisierung funktioniert nicht automatisch sondern muss mit Strg+Shift+F9 aufgerufen werden.

Hilft das weiter?

Jürgen

Hallo

@Jürgen
Gute Arbeit !
Bis '..getTextfields' bin ich ja gekommen, aber danach noch '..getbyIndex(0).url' zu erforschen, kam ich nicht drauf

Gruß Karo

Hallo Karo,

Karolus hat geschrieben:@Jürgen
Gute Arbeit !
Bis '..getTextfields' bin ich ja gekommen, aber danach noch '..getbyIndex(0).url' zu erforschen, kam ich nicht drauf

Nee nee nee, will mich ja nicht mit fremden Feder schmücken, aber ich kann vielleicht nur besser lesen.

balu hat geschrieben:Den eingerückten Teil der Formel habe ich hir im Forum gefunden, den Winfried mal gepostet hatte um den Hyperlink in eine "MessageBox" auszugeben.
....

balu hat geschrieben:Function HyperAdresse (HyAdres As Integer)

oBlatt = ThisComponent.Sheets().getByName( "Tabelle1" )
oZelle = oBlatt.getCellRangeByName( "C3" )
Print ConvertFromURL( oZelle.getTextFields().getByIndex( 0 ).URL )

HyperAdresse = HyAdres

End Function

Schönen Gruss.

Jürgen

Hallo

oZelle.getTextFields().getByIndex( 0 ).URL )

Aua, da steht die Auflösung schon in der ersten Frage und ich suche verzweifelt mit mri und xray.

Gruß Karo

Hallo meine Freunde,

erst einmal ein dickes Dankeschön an meinen Freund Jürgen . Damit bin ich schon mal ein gutes Stück weiter.
Auch für unseren Formelpapst ein Dankeschön für seine Bemühungen .

Jedoch, möchte ich es noch etwas "Komfortabler" haben. Ja ja, ich weiss! Keine Ahnung von der Materie, aber nach noch mehr verlangen wollen, tztztz. .

Nun, wenn ich die Function nach rechts und unten ziehen will, ergibt das ein Problem. Denn die Zelladressen wandern ja nicht mit, da sie ja in Anführungszeichen stehen. Das ist ja so, als wären es Absolute Bezüge A-la $A$1. Und wenn ich die Anführungszeichen weglasse, dann määckert Calc und das Makro meldet einen "Exception".

Wenn ich aber den Aufruf der Function so ändere, dass sie sich die Zelladresse aus einer anderen Zelle holt, dann geht es, auch wenn es etwas umständlich ist.
Beispiel an Hand der angehängten geänderten Beispieldatei:
In A20 steht A2, und in B20 steht C2
In A21 steht A3, und in B21 steht C3
[...]
Der Aufruf der Function lautet dann: Und die kann ich ja dann z.B. nach unten ziehen.
Schöner wäre es allerdings, wenn es ohne die Hilfszellen gehen würde, also dass die Zellbezüge sich automatisch anpassen. Läßt sich da noch was machen? Das wäre einfach fantastisch *freu*. Und wenn nicht, ist es auch nicht weiter schlimm.

@Karo

Aua, da steht die Auflösung schon in der ersten Frage und ich suche verzweifelt mit mri und xray.

Tschuldigung mein Fehler. Ich sollte demnächst aufm Bahnhof lauter und deutlicher reden .


Gruß
balu

Hallo
Damit ich hier auch mal was sinnvolles beitrage: Aufrufsyntax in Calc:
=HYPERADRESSE(SPALTE(A2);SPALTE(C2);ZEILE(A2))

dies kannst du ohne Hilfszellen einfach nach unten ziehen.

edit:
Fehler beseitigt!

Gruß Karo

Hallo Karo,

edit:
Fehler beseitigt!

Nicht ganz. Du hattest die Variablen nicht ganz richtig defeniert (oder so).
Richtig muss es wohl heißen Mit was anderem als "Integer" habe ich jetzt nicht getestet.

Kurz und gut.
Das Ergebnis ist jetzt Göttlich. Es funzt so wie ich es mir gewünscht hatte. Ich bin echt Häppy .
Respekt, und ein dickes Herzliches Dankeschön an dich


Gruß
balu

Hallo Leute,

für all diejenigen die irgendwann einmal auf diesen Beitrag stoßen, sei noch mal eben die Parameterbelegung von kurz erklärt.

SPALTE(A2) ist die Spalte mit dem formatiertem Hyperlink
SPALTE(C2) ist die Spalte mit der Prüfziffer
ZEILE(A2) ist die Zeile in der sich beide Zellen befinden müssen.

Bei SPALTE spielt die Zeilennummer keine Rolle. Wichtig ist der Spaltenname, da dadurch die Spaltennummer defeniert wird.
Und bei ZEILE verhält es sich genau andersrum.

Daraus folgt dann; das die auszulesende Zelle mit dem Hyperlink sich in der gleichen Zeile befinden muss, wie die Zelle mit der Püfziffer. Die Spaltendifferenz spielt keine Rolle, sie kann ein, oder mehrere Spalten weit auseinander sein.

Ich hoffe das es verständlich ist.

Mit dieser kurzen Erklärung wollte ich mich noch mal bei Jürgen und Karo für ihre Hilfe bedanken.
Danke Jungs
Das war ich euch schuldig.


Gruß
balu

Hallo Zusammen,

balu hat geschrieben:Jedoch, möchte ich es noch etwas "Komfortabler" haben. Ja ja, ich weiss! Keine Ahnung von der Materie, aber nach noch mehr verlangen wollen, tztztz.

Es gibt nichts Schlechtes was nicht auch was Gutes für sich hat.

Mir hat sich nämlich jetzt folgendes erschlossen:
Wenn man die Funktion so wie Karolus über Zeile, Spalte usw. schreibt, dann aktualisiert sich der Zellinhalt automatisch, wenn sich die "Prüfziffer" ändert. Also Strg+Shift+F9 kann entfallen.


Einen erfolgreichen Wochenstart wünsche ich.

Jürgen