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

Forumthread: Links mit unterschiedlichen Browsern öffnen

Links mit unterschiedlichen Browsern öffnen
11.10.2018 09:43:02
Gunter
Hallo Zusammen
In einer Tabelle habe ich Links die je nach dem an welchem PC sie geöffnet werden mit dem jeweiligen Standardbrowser geöfffnet werden. Da sie aber nur mit mit Firefox gut aussehen, möchte ich, dass der Link immer mit Firefox geöffnet wird, ohne dass der Standardbrowser geändert werden muss!
Für zweckdienliche Hinweise herzlichen Dank.
Gruss
Gunter
Anzeige

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

Betreff
Datum
Anwender
Anzeige
Das kannst Du so...
11.10.2018 10:15:43
Case
Hallo, :-)
... lösen: ;-)
Option Explicit
#If Win64 Then
Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As LongPtr, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As LongPtr
#Else
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
#End If
Public Sub Main()
ShellExecute 0, "Open", "Firefox", "https://www.herber.de/forum", "", 1
End Sub
Servus
Case

Anzeige
AW: Das kannst Du so...
11.10.2018 10:38:01
Gunter
Hallo Case
Vielen Dank für deine Antwort!
Das funktioniert prima mit einer Website.
Nun besteht mein Problem darin, dass der Link auf eine html Seite auf einem Netzwerklaufwerk zeigt und im Pfadnamen leider Leerzeichen enthalten sind. Zumindest wird beim Ausführen der Sub ein Browser Fenster mit vier Tabs geöffnet, geht das noch zu ändern?
Danke und Gruss
Gunter
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Links mit unterschiedlichen Browsern öffnen


Schritt-für-Schritt-Anleitung

Um einen Link mit einem bestimmten Browser, wie z.B. Firefox, zu öffnen, kannst du ein einfaches VBA-Skript verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke im Menü auf Einfügen und wähle Modul.

  3. Füge den folgenden Code in das Modul ein:

    Option Explicit
    #If Win64 Then
    Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As LongPtr, ByVal lpOperation As String, ByVal lpFile As String, _
    ByVal lpParameters As String, ByVal lpDirectory As String, _
    ByVal nShowCmd As Long) As LongPtr
    #Else
    Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
    ByVal lpParameters As String, ByVal lpDirectory As String, _
    ByVal nShowCmd As Long) As Long
    #End If
    
    Public Sub Main()
    ShellExecute 0, "Open", "Firefox", "https://www.deine-url.de", "", 1
    End Sub
  4. Ersetze "https://www.deine-url.de" mit dem Link, den du mit Firefox öffnen möchtest.

  5. Schließe den VBA-Editor und speichere deine Datei als .xlsm.

  6. Führe das Makro aus, um den Link mit Firefox zu öffnen.


Häufige Fehler und Lösungen

  • Link öffnet nicht mit Firefox: Stelle sicher, dass der Pfad zur Firefox.exe korrekt ist. Möglicherweise musst du den vollständigen Pfad angeben.
  • Browser-Fenster mit vielen Tabs: Wenn du beim Öffnen des Links mehrere Tabs erhältst, versuche, Leerzeichen im Pfad durch %20 zu ersetzen.

Alternative Methoden

Falls du keine VBA-Lösungen nutzen möchtest, gibt es auch andere Wege, Links in Firefox zu öffnen:

  1. Verknüpfungen erstellen: Du kannst Desktop-Verknüpfungen erstellen, die direkt auf die Firefox-Anwendung verweisen.
  2. Batch-Dateien: Erstelle eine Batch-Datei, die den Firefox-Browser mit der gewünschten URL öffnet.

Hier ein Beispiel für eine Batch-Datei:

@echo off
start firefox "https://www.deine-url.de"

Speichere die Datei mit der Endung .bat und führe sie aus.


Praktische Beispiele

Angenommen, du hast einen Link auf einer HTML-Seite, die auf ein Netzwerklaufwerk zeigt:

Public Sub OpenNetworkLink()
   Dim networkLink As String
   networkLink = "file://servername/pfad/zu/deiner datei.html"
   ShellExecute 0, "Open", "Firefox", networkLink, "", 1
End Sub

Hier wird der Link so angepasst, dass er mit Firefox geöffnet wird, ohne dass der Standardbrowser geändert werden muss.


Tipps für Profis

  • Um sicherzustellen, dass Links immer in Firefox geöffnet werden, kannst du das Skript anpassen, um alle Links in einer bestimmten Spalte zu durchlaufen.
  • Verwende eine Fehlerbehandlung im VBA-Code, um sicherzustellen, dass du informiert wirst, wenn ein Link nicht geöffnet werden kann.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass der Link immer mit Firefox geöffnet wird?
Du kannst das oben stehende VBA-Skript verwenden, um jeden Link mit Firefox zu öffnen, ohne den Standardbrowser ändern zu müssen.

2. Was mache ich, wenn Links nicht geöffnet werden?
Überprüfe den Link auf korrekte Schreibweise und stelle sicher, dass Firefox installiert und im Systempfad erreichbar ist. Achte auch darauf, dass der Pfad keine Leerzeichen enthält oder diese korrekt ersetzt werden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige