Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1532to1536
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1532to1536
1532to1536
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hyperlinks in einer Listbox per Doppelkick öffnen

Hyperlinks in einer Listbox per Doppelkick öffnen
30.12.2016 18:05:59
Benny
Guten Abend,
nach langer suche und selbst versuchen suche ich nun hier Hilfe :)
Es geht sich um folgendes. Ich habe eine Tabelle in welcher ich anhand einer UserForm suche ( A5 : E ) und mir das Ergebnis in einer Listbox anzeigen lassen. Das klappt auch alles super. Jetzt möchte ich gerne anhand einem Doppelklick in die Listbox einen Hyperlink öffnen.
- Der Hyperlink steht immer Spalte B
- Es ist der komplette Pfad hinterlegt( Server ) Anm. Hier im Beispiel ist es einfach www.google.de
- Der Hyperlink öffnet nur PDF Dateien. Keine Webseiten , Excel Sheets etc
Hier ist noch das Beispiel.
https://www.herber.de/bbs/user/110267.xlsm
Wie bekomme ich das hin ?

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hyperlinks in einer Listbox per Doppelkick öffnen
30.12.2016 18:42:24
Beverly
Hi Benny,
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
ThisWorkbook.FollowHyperlink Address:=Cells(ListBox1.ListIndex + 5, 2).Hyperlinks(1). _
Address
End Sub

Es wird nicht geprüft, ob es ein Hyperlink ist.

AW: Hyperlinks in einer Listbox per Doppelkick öffnen
30.12.2016 18:57:08
Benny
Hallo Beverly ,
erstmal danke für die Schnelle Antwort.
Das klappt super aber nur solange 6 Einträge in der Tabelle sind ( War wohl mein Fehler, die restlichen Einträge rauszunehmen , hatte nicht daran gedacht , Entschuldige ). Wenn es mehr werden , z.B 100 , und die Listbox stellt ja nur das gesucht dar , stimmt der ListIndex nicht mehr. Gibt es eine Möglichkeit den ListIndex dem Gesuchten Ergebnis zuzuordnen ?
Beste Grüße
Anzeige
AW: Hyperlinks in einer Listbox per Doppelkick öffnen
30.12.2016 19:29:03
Beverly
Hi Benny,
ändere diesen Teil:
Address:=Cells(ListBox1.List(ListBox1.ListIndex, 0) + 4, 2).Hyperlinks(1). _
Address

AW: Hyperlinks in einer Listbox per Doppelkick öffnen
30.12.2016 19:07:15
Werner
Hallo Benny,
probier mal:
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim rngFund As Range
Dim strSuchbegriff As String
strSuchbegriff = Me.ListBox1.List(ListBox1.ListIndex, 1)
Set rngFund = Sheets("Tabelle1").Columns(2).Find(strSuchbegriff, _
LookIn:=xlValues, LookAt:=xlWhole)
If Not rngFund Is Nothing Then
ActiveWorkbook.FollowHyperlink Range(rngFund.Address).Hyperlinks(1).Address
Unload Me
End If
End Sub
Gruß Werner
Anzeige
AW: Hyperlinks in einer Listbox per Doppelkick öffnen
30.12.2016 19:15:09
Benny
Hallo Werner ,
danke für deine Idee. Jedoch sagt er mir , dass bei.. 
If Not rngFund Is Nothing Then
ActiveWorkbook.FollowHyperlink Range(rngFund.Address).Hyperlinks(1).Address
Unload Me
End If
..der Index außerhalb des gültigen Bereiches ist.
Beste Grüße

38 Forumthreads zu ähnlichen Themen

Probleme mit Hyperlink in xls/pdf
Florian

Hi zusammen,
habe eine Frage zu Hyperlinks in pdf: habe zwei xls-Dateien, die Hyperlinks enthalten. Aus beiden mach ich ein pdf, nur: einmal werden Hyperlinks übernommen, einmal nicht. Habe schon ein wenig herumgedoktert, der Grund liegt nicht im Adobe. Aber was kann an den xls-Dateien fals...
23.03.2009 11:29:58
Thread-ID: 1062836
2 Beiträge
Anzeige
Makro Frage beim Öffnen von pdf Dateien verhindern
pdf

Hallo Herber Fans,
ich baue gerade an einem Code, der den Wert der ActiveCell als Dateinamen annimmt und aus einem vorgegebenen Pfad die Datei öffnen soll. Wenn keine Dateiendung angegeben ist, werden alle gängigen Endungen durchgeloopt. Bei .pdf Dateien habe ich nun das Problem, daß die Fr...
15.01.2010 17:42:31
Thread-ID: 1130350
3 Beiträge
Hyperlink in pdf mit Druckbereich-Fehler
Florian

Hallo liebes Forum!
Habe wieder mal ein Problem, bei dem Ihr mir evt. helfen könnt: eine Makro erstellt eine Datei mit mehreren Sheets und Hyperlinks, die gegenseitig auf Sheets innerhalb des Workbooks verweisen. Dieses Dokument soll als pdf gedruckt werden, bei dem auch die Hyperlinks funk...
20.05.2010 07:37:06
Thread-ID: 1157918
2 Beiträge
Anzeige
Links automatisch in IE öffnen
Tim

Hallo,
ich habe eine UserForm mit verschiedenen Buttons, die zu bestimmten Internet- / Intranetseiten verlinken.
Beispiel-Code: ActiveWorkbook.FollowHyperlink Address:="http://www.WEBSEITE.com", NewWindow:=True
Gibt es eine Möglichkeit zu sagen, dass diese Links immer automatisch...
17.12.2012 09:38:28
Thread-ID: 1291181
2 Beiträge
Per Excel VBA HTTP LINK öffnen und Files einfügen
Andreas

Hallo Leute,
hab mal wieder eine Frage zu Excel VBA.
Ich möchte per VBA einen Netzwerk Ordner öffnen und die darin befindlichen Excel Dateien kopieren um sie dann unter einen HTTP LINK zu Speichern.
Hab nun schon recht viel rum probiert und gelesen, aber leider ohne Erfolg.
Der...
25.07.2014 14:43:00
Thread-ID: 1372331
3 Beiträge
integrierte PDF-Datei per VBA öffnen
Peet

Halli Hallo,
habe folgendes Problem:
Ich habe in ein Tabellenblatt meiner Excel-Mappe ein Objekt (PDF-Datei) eingefügt und diese "Anleitung" genannt.
Nun würde ich gerne per VBA-Makro gezielt die PDF-Datei öffnen.
Habt ihr einen Tipp, mit welchem Befehl ich das machen könnte?
22.01.2015 09:22:46
Thread-ID: 1404334
4 Beiträge
PDF als Objekt aus Hyperlink einbinden
Markus

Hallo zusammen,
nach längerer erfolgloser Suche brauche ich jetzt doch eure Hilfe.
Wie kann ich in einem Arbeitsblatt den ermittelten Hyperlink aus Zelle "D46" so zusagen als Objekt (Vorschaubild)neben dem Hyperlink anzeigen lassen.
Der Hyperlink bezieht sich auf einen Ordner mit ve...
16.07.2015 16:30:38
Thread-ID: 1436850
3 Beiträge
Eingebettetes PDF schützen und dennoch öffnen
Günther

Hallo zusammen,
ich stehe vor folgender Problemstellung: Eine PDF Datei soll eingebettet werden (ohne Link, Anzeige als Icon). Danach soll das eingebettete Objekt geschützt sein, man soll es weder bewegen noch löschen können. Das Öffnen soll aber weiterhin möglich sein. Nach umfangreicher S...
18.02.2016 18:10:59
Thread-ID: 1476489
4 Beiträge
Anzeige

Links zu Excel-Dialogen

ListBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
14
2
1
1
1
2
3
2
3
6
1
6
2
2
2
3
3
1
2
2
2
14
1
5