Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Mehrere Hyperlinks in einer Excel-Zelle
#1
Hallo Freunde,

gibt es eine Möglichkeit in einer einzelnen Excel-Zelle mehrere Hyperlinks zu programmieren. Wenn also in der Zelle z.B. folgender String steht: "Dies ist eine beliebige Zelle", dass dann das Wort "Dies" mit einem Hyperlink versehen wird und gleichzeitig das Wort "Zelle". Wie programmiert man so etwas?
Antwortento top
#2
Hallo,

nein, das geht m.W. nicht.
Gruß
Peter
Antwortento top
#3
Hi,

mit einem Trick kannst du das so bewerkstelligen:

Lege über das Wort "Dies" und über das Wort "Zelle" ein Rechteck (aus Einfügen / Formen) und formatiere dies "ohne Füllung" und "ohne Linien". Mit einem Rechtsklick auf das jeweilige Rechteck kannst du einen Link auf die gesuchte Zelle setzen.

Nachteil dieser Krücke ist, dass sich bei Sortier- oder Verschiebearbeiten zwar die Zellinhalte, nicht jedoch die darüberliegenden Grafiken mit verschieben lassen.
Gruß Günter
Misserfolg ist eine Chance, es beim nächsten Mal besser zu machen.
(Henry Ford) http://www.sprueche-zum-nachdenken.eu
Antwortento top
#4
Hallo Wulfi,

wenn man es "programmieren" soll, dann könnte man beim Klick auf die Zelle auch eine Abfrage programmieren, wo man hin will.

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Ziel
If Target.Address <> "$A$1" Then Exit Sub
Ziel = MsgBox("Möchten Sie zu Dies (Ja) oder Zelle (Nein)", vbYesNo)
If Ziel = vbYes Then
  Application.Goto reference:=Cells(3, 1)
Else
  Application.Goto reference:=Cells(3, 1)
End If
End Sub
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
Antwortento top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste