Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
900to904
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
900to904
900to904
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Hyperlink-Adresse in MsgBox anzeigen

Hyperlink-Adresse in MsgBox anzeigen
29.08.2007 23:53:21
Selma
Hi Leute,
wie kann ich die Hyperlink-Adressen der markierten Zellen in einem MsgBox anzeigen?
Vielen Dank im Voraus.
Liebe Grüße
Selma

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hyperlink-Adresse in MsgBox anzeigen
30.08.2007 00:00:00
Oberschlumpf
Hi Selma
Versuch es mal so.
Markiere zuerst den gewünschten Zellbereich, und führe dann diesen Code aus:

Sub HL()
Dim lrZelle As Range
For Each lrZelle In Selection
If lrZelle.Hyperlinks.Count > 0 Then
If lrZelle.Hyperlinks(1).Address  "" Then
MsgBox lrZelle.Address & " " & lrZelle.Hyperlinks(1).Address
Else
MsgBox lrZelle.Address & " " & lrZelle.Hyperlinks(1).SubAddress
End If
End If
Next
End Sub


Hilft das?
Ciao
Thorsten

AW: Hyperlink-Adresse in MsgBox anzeigen
30.08.2007 00:04:42
Selma
Danke Thorsten.
Es funktioniert prima...
LG
Selma
Anzeige

157 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige