freak'n excel hyperlink functions

Seite 1 von 1 - Forum: Coding Stuff auf overclockers.at

URL: https://www.overclockers.at/coding-stuff/freakn_excel_hyperlink_functions_67234/page_1 - zur Vollversion wechseln!

atrox schrieb am 14.02.2003 um 12:42

in excel/vb gibt es eine funktion zum erstellen von hyperlinks:
HYPERLINK(Addr;Screenname)
ich suche quasi die umkehr-funktion:
habe 300 zellen mit hyperlinks, und möchte diese in screenname und addr aufspalten. screenname ist kein problem (ist ja der normale wert), aber die addr bekomm ich nicht raus.

irgendwelche techniken/lösungen in Excel oder vb ?

d3cod3 schrieb am 14.02.2003 um 12:44

Daten -> Text in Spalten

ist es das was du meinst?

watchout schrieb am 14.02.2003 um 18:39

ohne vb wirst du dabei nicht weit kommen, mit strings habens die excel-funktionen nicht so...

die .Formula eigenschaft dürfte dann für dich interessant sein

DirtyHarry schrieb am 14.02.2003 um 19:29

Public Function URLAufteilen(Zelle As Object)
URLAufteilen = Zelle.Formula
End Function

das mitn string aufteilen wollt ich dann nicht mehr machen
cu

robo

atrox schrieb am 14.02.2003 um 23:49

Zitat von robobimbo
Public Function URLAufteilen(Zelle As Object)
URLAufteilen = Zelle.Formula
End Function

das funktioniert leider nur, wenn der link bereits als formel drin steht, beim mir steht es als hyperlink-objekt in der zelle (die tabelle wurde ursprünglich von irgendwem aus html importiert)

... aber es hat mich auf den richtigen weg geführt.. und mit nachfolgenem code klappt es sogar:

Public Function URLaufteilen(Zelle As Object)
URLaufteilen = Zelle.Hyperlinks.Item(1).Address
End Function

das "mailto:" am anfang rausschneiden ist dann jetzt ein leichtes.

thx