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

Forumthread: Hyperlink öffnen - URL in Zelle

Hyperlink öffnen - URL in Zelle
13.07.2008 16:20:00
Mister
Hallo,
folgendes Makro habe ich im Forum gefunden womit man Internet Explorer öffnet und eine bestimmte Webseite anzeigt.

Private Sub CommandButton1_Click()
Shell "C:\Programme\Internet Explorer\iexplore.exe", vbMaximizedFocus
Set wshshell = CreateObject("WScript.Shell")
wshshell.Run "www.herber.de/"
End Sub


Es klappt super aber wir kriege ich es hin, dass eine Webseite angezeigt wird deren URL in eine Zelle steht. z.B. Tabelle1, A1
Danke und Gruß
Martin

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
wshshell.Run [A1] oT
13.07.2008 16:24:00
Backowe

Oder noch etwas kürzer
13.07.2008 16:29:00
Backowe
Hi,
VBA-Code:
Private Sub CommandButton1_Click()
Dim a
a = Shell("C:\Programme\Internet Explorer\iexplore.exe " & [A1], vbMaximizedFocus)
End Sub
Gruss Jürgen

Anzeige
AW: Oder noch etwas kürzer
13.07.2008 16:34:00
Mister
Hallo Backowe,
das klappt super. Aber was ist wenn die URL in einer anderen Tabelle ist?
z.B. Sheets("Lebensalter"). Range("K54")
Gruß
Martin

Dann so! ;o)
13.07.2008 16:37:00
Backowe
Hi Martin,
VBA-Code:
Private Sub CommandButton1_Click()
Dim a
a = Shell("C:\Programme\Internet Explorer\iexplore.exe " & Sheets("Lebensalter").[K54], vbMaximizedFocus)
End Sub
Gruss Jürgen

Anzeige
Perfekt!
13.07.2008 16:40:00
Mister
Danke Jürgen,
einen schönen Sonntag noch!
Gruß
Martin

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Hyperlink aus einer Zelle in Excel öffnen


Schritt-für-Schritt-Anleitung

  1. Öffne Excel und erstelle eine neue Arbeitsmappe oder öffne eine bestehende.

  2. Füge einen Button ein, indem du auf "Entwicklertools" gehst und "Einfügen" wählst. Wähle den "Button (Formularsteuerelement)" aus und ziehe ihn auf dein Arbeitsblatt.

  3. Doppelklicke auf den Button, um das VBA-Editor-Fenster zu öffnen.

  4. Füge den folgenden VBA-Code ein, um die URL aus einer Zelle (z.B. A1) zu öffnen:

    Private Sub CommandButton1_Click()
        Dim url As String
        url = Range("A1").Value
        Shell "C:\Programme\Internet Explorer\iexplore.exe " & url, vbMaximizedFocus
    End Sub
  5. Schließe den VBA-Editor und gehe zurück zu Excel.

  6. Gib eine URL in Zelle A1 ein, die du öffnen möchtest.

  7. Klicke auf den Button, um die eingegebene URL im Internet Explorer zu öffnen.


Häufige Fehler und Lösungen

  • Fehler: "Die angegebene Datei wurde nicht gefunden."

    • Lösung: Stelle sicher, dass der Pfad zu iexplore.exe korrekt ist. Überprüfe, ob der Internet Explorer tatsächlich in dem angegebenen Ordner installiert ist.
  • Fehler: Der Button tut nichts.

    • Lösung: Überprüfe, ob der VBA-Code korrekt eingegeben wurde und ob der Button tatsächlich mit dem Code verknüpft ist.

Alternative Methoden

  • Verwendung von Hyperlinks in Excel: Du kannst auch die eingebaute Funktion von Excel nutzen, um Hyperlinks zu erstellen. Klicke mit der rechten Maustaste auf eine Zelle, wähle "Hyperlink" und gib die URL ein.

  • Excel VBA Link öffnen mit einer anderen Anwendung: Statt Internet Explorer kannst du auch andere Browser verwenden, indem du den entsprechenden Pfad im VBA-Code änderst.


Praktische Beispiele

  • URL aus einer anderen Tabelle öffnen: Wenn die URL in einer anderen Tabelle steht, kannst du den Code wie folgt anpassen:

    Private Sub CommandButton1_Click()
        Dim url As String
        url = Sheets("Lebensalter").Range("K54").Value
        Shell "C:\Programme\Internet Explorer\iexplore.exe " & url, vbMaximizedFocus
    End Sub
  • Mehrere URLs verwalten: Du kannst auch mehrere URLs in einer Liste in Excel haben und durch Eingabe der Zeilennummer die gewünschte URL öffnen.


Tipps für Profis

  • Automatisiere das Öffnen von Links: Du kannst ein Excel-Makro erstellen, das automatisch alle Links in einer Spalte öffnet. Dies kann nützlich sein, wenn du mehrere Seiten regelmäßig überprüfen musst.

  • Verwende Error-Handling: Integriere Fehlerbehandlungsroutinen in deinen VBA-Code, um sicherzustellen, dass dein Makro auch bei ungültigen URLs nicht abstürzt.


FAQ: Häufige Fragen

1. Wie kann ich eine URL aus einer Zelle in Excel öffnen?
Du kannst dies mit einem VBA-Makro tun, das die URL aus einer bestimmten Zelle liest und sie in einem Webbrowser öffnet.

2. Funktioniert das auch mit anderen Browsern?
Ja, du musst lediglich den Pfad zum ausführbaren Programm des gewünschten Browsers im VBA-Code anpassen.

3. Was mache ich, wenn ich keine Entwicklertools in Excel sehe?
Aktiviere die Entwicklertools über die Excel-Optionen unter "Menüband anpassen". Dort kannst du die Entwicklertools aktivieren.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige