13.02.2018, 11:23 (Dieser Beitrag wurde zuletzt bearbeitet: 13.02.2018, 11:23 von MBS_Daniel.)
Hallo,
bitte um eure Hilfe: Ausgangspunkt: (Excel 2010) Tabelle A verschiedene Spalten mit beliebigen Zeilen. In der Spalte A sind Hyperlinks zu Skizzen hinterlegt.
Tabelle B hier sollten alle Daten der Tabelle A mittels Formel übernommen werden, soweit kein Problem, aber wie bekomme ich die Hyperlinks mit den Skizzen auch übernommen? Gibt es dazu auch eine Lösung?
Du hast geschrieben: In der Spalte A sind Hyperlinks zu Skizzen hinterlegt. Der obige Tipp erfüllt meiner Ansicht nach genau Deine Anforderung, oder Du musst diese präzisieren.
13.02.2018, 12:02 (Dieser Beitrag wurde zuletzt bearbeitet: 13.02.2018, 12:02 von Wastl.)
Moin
Wenn sich in Tabelle1 Zelle A1 ein Hyperlink befindet, der sich anklicken lässt und dann was öffnet, tut das bei mir mit der Formel in einem andren Tabellenlblatt auch. klick mal wo anders hin und dann wieder auf die Zelle mit der Formel
13.02.2018, 13:49 (Dieser Beitrag wurde zuletzt bearbeitet: 13.02.2018, 13:49 von Wastl.)
Funktioniert denn der Hyperlink in der Quell-Adresse? Wenn ja, zeig mal was du gemacht hast, also lade deine Datei - anonymisiert, wenn geheime Daten drin sind - hoch
13.02.2018, 13:58 (Dieser Beitrag wurde zuletzt bearbeitet: 13.02.2018, 13:58 von DbSam.)
Aaaah, ein Bilderrätsel. Cool.
Also hast Du in Deiner ersten Tabelle einen formatierten Hyperlink, also einen Link mit 'freundlichem Text'. Das könnte man u.U. dem geneigten Helfer als weitere Info mit auf den Weg geben.
Bei mit 'freundlichem Text' formatierten Links kenne ich im Moment keine eingebaute Funktion in Excel und behelfe mich daher immer so:
Folgenden Code in ein vorhandenes (oder neu zu erstellendes) Modul der Mappe mit der Tabelle2 geben:
Code:
Public Function HyperlinkAddress(ByVal rngZelle As Range) As String If rngZelle.Hyperlinks.Count Then If "" <> rngZelle.Hyperlinks(1).SubAddress Then HyperlinkAddress = rngZelle.Hyperlinks(1).SubAddress Else HyperlinkAddress = rngZelle.Hyperlinks(1).Address End If Else HyperlinkAddress = "" End If End Function
(13.02.2018, 13:58)DbSam schrieb: Aaaah, ein Bilderrätsel. Cool.
Also hast Du in Deiner ersten Tabelle einen formatierten Hyperlink, also einen Link mit 'freundlichem Text'. Das könnte man u.U. dem geneigten Helfer als weitere Info mit auf den Weg geben.
Bei mit 'freundlichem Text' formatierten Links kenne ich im Moment keine eingebaute Funktion in Excel und behelfe mich daher immer so:
Folgenden Code in ein vorhandenes (oder neu zu erstellendes) Modul der Mappe mit der Tabelle2 geben:
Code:
Public Function HyperlinkAddress(ByVal rngZelle As Range) As String If rngZelle.Hyperlinks.Count Then If "" <> rngZelle.Hyperlinks(1).SubAddress Then HyperlinkAddress = rngZelle.Hyperlinks(1).SubAddress Else HyperlinkAddress = rngZelle.Hyperlinks(1).Address End If Else HyperlinkAddress = "" End If End Function