Link aus Excel im Browser öffnen, aber wie?

Forumthread: Link aus Excel im Browser öffnen, aber wie?

05.12.2012 09:52:28

Martin

Hallo Leute,
ich habe mit der Hilfe des Forums eine Datei "gebastelt" mit der ich einen Link, der durch eine Verkettung entstanden ist nun in den Browser kopieren möchte, so dass sich der Browser mit dem entsprechendem Link öffnet und sich die Excel-Datei im Hintergrund schließt.
Ich kopiere das Makro mal, wie es jetzt aussieht:

Sub Zusammenfassung()
' Zusammenfassung Makro
Sheets("Script").Select
Range("A2").Select
Selection.Copy
Range("A4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Selection.Copy
' der hier kopierte Link muss nun im Browser geöffnet werden, die Excel
' Datei soll geschlossen werden!
Sheets("Eingabe").Select
Range("C7").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("C6").Select
Selection.ClearContents
Sheets("Script").Select
Selection.Copy
Sheets("Eingabe").Select
Application.DisplayAlerts = False
ActiveWorkbook.Save
ActiveWorkbook.Close
' hier habe ich schon Unterstützung des Forums bekommen,
' aber der oben kopierte Link muss nun noch eingefügt werden,
' der Link ist jedes Mal anders!
Dim appIE As Object
Dim URL As String
URL = >Hier muss der Link rein, der aus A4 (siehe oben) kopiert wurde"
Set appIE = CreateObject("InternetExplorer.application")
appIE.Visible = True                'False ist unsichtbar    True ist Sichtbar
appIE.navigate URL
While Not appIE.ReadyState = 4     'Warte auf Webseite
DoEvents
Wend
Set appIE = Nothing
End Sub

Kann mir jemand helfen?
Das wäre klasse!
Gruß
Martin

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Link aus Excel im Browser öffnen, aber wie?

05.12.2012 10:39:39

mumpel
AW: Link aus Excel im Browser öffnen, aber wie?

05.12.2012 11:34:35

Martin

AW: Link aus Excel im Browser öffnen, aber wie?

05.12.2012 10:39:39

mumpel

Hallo!
Lass mal das "Select" weg, man kann auch direkt kopieren.
Versuch es mal so (ungetestet):
Gruß, René

AW: Link aus Excel im Browser öffnen, aber wie?

05.12.2012 11:34:35

Martin

WOW!
Vielen lieben Dank!
Nach minimaler Anpassung funktioniert das genau so wie es sein soll!
MERCI!!!

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um einen Link aus einer Excel-Datei im Browser zu öffnen, kannst du ein Makro verwenden. Hier ist eine einfache Anleitung:

Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
Füge ein neues Modul hinzu: Rechtsklick auf "VBAProject (DeineDatei.xlsx)" > Einfügen > Modul.

Kopiere und füge den folgenden Code in das Modul ein:

Sub Zusammenfassung()
   ' Zusammenfassung Makro
   Dim appIE As Object
   Dim URL As String

   ' Hier den Link aus der Zelle A4 angeben
   URL = Sheets("Script").Range("A4").Value

   ' Internet Explorer öffnen
   Set appIE = CreateObject("InternetExplorer.Application")
   appIE.Visible = True
   appIE.navigate URL

   ' Warten, bis die Webseite geladen ist
   While Not appIE.ReadyState = 4
       DoEvents
   Wend

   ' Excel-Datei schließen
   Application.DisplayAlerts = False
   ActiveWorkbook.Close
End Sub

Speichere deine Excel-Datei als Makro-fähige Datei (*.xlsm).
Führe das Makro aus, um den kopierten Link im Browser zu öffnen.

Häufige Fehler und Lösungen

Link öffnet sich nicht: Überprüfe, ob die Zelle A4 tatsächlich einen gültigen Link enthält. Stelle sicher, dass der Text als Hyperlink formatiert ist.
Excel nicht im Browser öffnen: Wenn du Excel im Browser öffnen möchtest, stelle sicher, dass du die Online-Version von Excel verwendest.
Makro funktioniert nicht: Stelle sicher, dass Makros in deinen Excel-Einstellungen aktiviert sind. Gehe zu "Datei" > "Optionen" > "Sicherheit" und aktiviere die Makros.

Alternative Methoden

Wenn du Excel nicht im Browser verwenden möchtest, gibt es auch andere Möglichkeiten, Links zu öffnen:

Hyperlink-Funktion: Du kannst die HYPERLINK-Funktion in Excel nutzen, um einen Link direkt zu erstellen, der beim Klicken im Standardbrowser geöffnet wird. Beispiel:
```
=HYPERLINK("http://www.beispiel.de", "Klicke hier")
```
Rechtsklick auf die Zelle: Du kannst auch einfach mit der rechten Maustaste auf die Zelle klicken und "Link öffnen" auswählen, wenn der Link korrekt formatiert ist.

Praktische Beispiele

Angenommen, du hast in Zelle A4 den Link http://www.example.com. Um diesen Link zu öffnen, könnte dein Makro so aussehen:

Sub LinkÖffnen()
    Dim appIE As Object
    Dim URL As String
    URL = Sheets("Script").Range("A4").Value
    Set appIE = CreateObject("InternetExplorer.Application")
    appIE.Visible = True
    appIE.navigate URL
End Sub

Wenn du das Makro ausführst, wird der Link im Internet Explorer geöffnet.

Tipps für Profis

Vermeide das "Select": Statt Zellen auszuwählen, arbeite direkt mit den Objekten, um den Code effizienter und schneller zu machen.
Fehlerbehandlung: Füge eine Fehlerbehandlung hinzu, um sicherzustellen, dass dein Makro nicht abstürzt, falls der Link ungültig ist.
```
On Error Resume Next
appIE.navigate URL
On Error GoTo 0
```
Testen in verschiedenen Browsern: Wenn du Probleme mit Internet Explorer hast, teste den Link auch in anderen Browsern, wie Chrome oder Firefox.

FAQ: Häufige Fragen

1. Wie kopiere ich einen Link in den Browser?
Du kannst einen Link kopieren, indem du ihn mit STRG + C markierst und dann in die Adresszeile des Browsers mit STRG + V einfügst.

2. Was tun, wenn der Link nicht funktioniert?
Überprüfe den Link auf Tippfehler oder versuche, ihn manuell in den Browser einzugeben. Wenn der Link immer noch nicht funktioniert, könnte die Webseite offline sein.

Beliebteste Forumthreads (12 Monate)

Link aus Excel im Browser öffnen, aber wie?

Forumthread: Link aus Excel im Browser öffnen, aber wie?

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

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Link aus Excel im Browser öffnen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread