Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Hyperlink via UserForm öffnen

Forumthread: Hyperlink via UserForm öffnen

Hyperlink via UserForm öffnen
03.06.2019 10:05:25
Michael
Hallo Zusammen,
ich habe eine UserForm welches auch ein Label Feld enthält
Das Label Feld enthält entweder einen Hyperlink oder ist leer.
Der Hyperlink kommt aus einer Zelle von meinem Arbeitsblatt.
Jetzt möchte ich das man bei einem Klick auf das Label den Hyperlink öffnen kann. Das funktioniert soweit auch ganz gut, jedoch wird auch immer meine Fehlermeldung mit eingeblendet. Wie kann ich verhindern das der Browser und meine Fehlermeldung angezeigt werden. Also entweder Fehlermeldung oder der Browser.
Ich verwende bislang folgenden Code:
Private Sub Label_Hyperlink_Click()
On Error GoTo NoCanDo
ActiveWorkbook.FollowHyperlink Label_Hyperlink.Caption
NoCanDo:
MsgBox "Sorry, we cannot open your Link"
End Sub

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Hyperlink via UserForm öffnen
03.06.2019 10:50:55
Nepumuk
Hallo Michael,
so:
Private Sub Label_Hyperlink_Click()
On Error GoTo NoCanDo
ActiveWorkbook.FollowHyperlink Label_Hyperlink.Caption
Exit Sub
NoCanDo:
MsgBox "Sorry, we cannot open your Link"
End Sub

Gruß
Nepumuk
AW: Hyperlink via UserForm öffnen
03.06.2019 11:24:41
Michael
Hi Nepumuk,
ohhh man, das war's, es funktioniert :-)
Vielen Dank !
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Hyperlink in UserForm öffnen ohne Fehlermeldung


Schritt-für-Schritt-Anleitung

Um einen Hyperlink in einer UserForm zu öffnen, ohne dass eine Fehlermeldung angezeigt wird, folge diesen Schritten:

  1. Öffne den Visual Basic for Applications (VBA)-Editor in Excel.

  2. Erstelle eine UserForm und füge ein Label hinzu.

  3. Setze die Caption des Labels auf den Hyperlink, den du öffnen möchtest. Dies kannst du aus einer Zelle deines Arbeitsblatts tun.

  4. Füge den folgenden VBA-Code in das Codefenster der UserForm ein:

    Private Sub Label_Hyperlink_Click()
       On Error GoTo NoCanDo
       ActiveWorkbook.FollowHyperlink Label_Hyperlink.Caption
       Exit Sub
    NoCanDo:
       MsgBox "Sorry, we cannot open your Link"
    End Sub
  5. Schließe den VBA-Editor und teste die UserForm. Wenn du auf das Label klickst, sollte der Hyperlink geöffnet werden, ohne dass eine Fehlermeldung angezeigt wird.


Häufige Fehler und Lösungen

  • Fehler: Hyperlink wird nicht geöffnet

    • Lösung: Stelle sicher, dass die Caption des Labels den vollständigen und korrekten Hyperlink enthält.
  • Fehler: Fehlermeldung erscheint trotz korrektem Hyperlink

    • Lösung: Überprüfe, ob du die Exit Sub-Zeile im Code hast, um die Fehlermeldung nur im Fehlerfall anzuzeigen.

Alternative Methoden

Wenn du alternative Methoden zur Öffnung von Hyperlinks in Excel suchst, kannst du die folgenden Ansätze in Betracht ziehen:

  • Verwende die Shell-Funktion, um den Standardbrowser direkt zu starten:

    Private Sub Label_Hyperlink_Click()
      On Error Resume Next
      Shell "cmd /c start " & Label_Hyperlink.Caption, vbHide
    End Sub
  • Erstelle einen Button anstelle eines Labels, um den Hyperlink zu öffnen, was möglicherweise eine benutzerfreundlichere Lösung darstellt.


Praktische Beispiele

Hier sind einige Beispiele, wie du Hyperlinks in einer UserForm verwenden kannst:

  1. Öffnen eines externen Links:

    • Setze die Caption eines Labels auf https://www.example.com.
  2. Öffnen eines internen Links (z.B. zu einer Datei):

    • Setze die Caption eines Labels auf den Pfad zu deiner Datei, z.B. C:\Users\DeinName\Documents\deineDatei.xlsx.

Tipps für Profis

  • Variablen nutzen: Du kannst die Caption des Labels dynamisch über eine Variable setzen, um flexibler zu sein.

    Dim link As String
    link = "https://www.example.com"
    Label_Hyperlink.Caption = link
  • Fehlerprotokollierung: Implementiere eine Fehlerprotokollierung, um Probleme bei der Hyperlink-Öffnung besser nachverfolgen zu können.


FAQ: Häufige Fragen

1. Frage Wie verhindere ich, dass der Browser geöffnet wird, wenn der Hyperlink ungültig ist?

Antwort: Verwende die On Error-Anweisung im Code, um die Fehlermeldung zu steuern und den Browser nicht zu öffnen.

2. Frage Kann ich den Hyperlink auch aus einer anderen Quelle (z.B. Datenbank) beziehen?

Antwort: Ja, du kannst den Hyperlink auch aus einer Datenquelle abrufen und in die Caption des Labels setzen. Achte darauf, den korrekten Datenzugriff zu verwenden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige