Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
19.10.2025 10:46:18
Zufallszahlen nur wenn Datum ab kommenden Sonntag
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1584to1588
1584to1588
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hyperlinks in Email

Forumthread: Hyperlinks in Email

Hyperlinks in Email
17.10.2017 10:47:53
Max
Hallo liebes Excel Team,
ich habe mal eine generelle Frage, ohne Beispiel.
Folgendes Szenario:
Ich habe einen Hyperlink in einer Excel datei und möchte diesen Hyperlink in eine Email stecken.
Wie schaffe ich es (mit welcher Funktion) ,dass ´vba den Hyperlink "mitnimmt" und nicht nur der Namen des Hyperlinks in die Email kopiert ?
Vielen Dank schonmal.
Max
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Welche Art von Hyperlink?...
17.10.2017 11:40:58
Hyperlink?...
Max?
Handelt es sich um einen Formel-Hyperlink in der Zelle (=HYPERLINK(...)) oder einen "echten" Hyperlink, erzeugt durch ReMausKlick und Hyperlink einfügen?
LG
Michael
AW: Welche Art von Hyperlink?...
17.10.2017 11:48:15
Hyperlink?...
Hallo Michael.
Es handelt sich hierbei um einen Hyperlink der zu einer externen Datei führt.
Der Pfad sollte variabel sein.
Also dann schätzungsweise ein echter Hyperlink.
Anzeige
AW: Welche Art von Hyperlink?...
17.10.2017 12:18:30
Hyperlink?... 

Sub send_Email_2()
Dim olApp As Object
Dim mbody As String
Dim Hlink As String
Hyperl = Range("C6").Hyperlinks(1).Address
MsgBox (Hyperl)
Set olApp = CreateObject("Outlook.Application")
With olApp.CreateItem(0)
.Subject = "Test"
.To = "Test@test.de"
.cc = "Test_CC@test.de"
.bcc = "Test_BCC@test.de"
.htmlbody = "Hier klicken

" & olOldBody
.Display
End With
Set olApp = Nothing
End Sub
Das ist was ich bis jetzt habe.
Ich habe versucht den Hyperlink auslesen zu lassen und einer Variablen zuzuordnen.
Dann habe ich versucht die Variable in HTML body einzusetzen, klappt aber nautürlich nicht.
Anzeige
AW: Welche Art von Hyperlink?...
17.10.2017 12:45:49
Hyperlink?...
Max,
...denn Ich habe versucht den Hyperlink auslesen zu lassen und einer Variablen zuzuordnen.
ist ja nicht falsch.
klappt aber nautürlich nicht. liegt nur daran, dass Du, wenn Du schon auf den HTML-Text, dann natürlich auch dafür sorgen musst, dass Du korrektes HTML übergibst (wenn Du einen klickbaren Link in der Outlook-Mail erzeugen willst):
https://www.herber.de/bbs/user/117023.txt
LG
Michael
Anzeige
AW: Welche Art von Hyperlink?...
17.10.2017 12:50:52
Hyperlink?...
Super es klappt!
Vielen Dank!
Gern, Danke für die Rückmeldung, owT
17.10.2017 13:06:45
Michael
AW: Gern, Danke für die Rückmeldung, owT
17.10.2017 13:31:06
Max
Also es klappt alles. Leider wird der Hyperlink (ein Internet link) nur bis zu einer bestimmten stelle übernommen. Ich kann diesen Link aus datenschutzrechtlichen Gründen hier nicht senden, aber kann es sein das es hier eine maximale Zeichenzahl gibt. Das erste nicth übernommene Zeichen ist ein %.
LG
Anzeige
Das kann ich mir nicht vorstellen...
17.10.2017 13:44:49
Michael
Max,
...aber wieviele Zeichen hat denn der Hyperlink? Das kannst Du ja einfach überprüfen.
Notfalls teile die Hyperlink-Adresse in zwei Teile, lies beide in eine separate Variable ein, und übergib dann dem HTML-Body einfach statt einer beide Variablen (verkettet).
LG
Michael
AW: Das kann ich mir nicht vorstellen...
17.10.2017 13:54:34
Max
eigentlich nicht so viele.
Es macht auch wenig sinn aber vba übernimmt nur einen teil der adresse.
Wenn ich die adresse manuell bei .htmlbody einfüge dann klappt es.
Ich habe mir die Adresse die er bei der Formel
Hyperl = Range("C6").Hyperlinks(1).Address ausliest über MSGBox anzeigen lassen.
Da liegt auch irgendwo der fehler, weil auch hier nur der halbe Code angezeigt wird.
Anzeige
Sorry,
17.10.2017 14:05:16
Michael
Max,
...beim derzeitigen Stand meiner Informationen kann ich Dir hier keine Hilfestellung mehr geben. Das leuchtet Dir hoffentlich ein.
LG
Michael
AW: Sorry,
17.10.2017 14:11:09
Max
ja klar, dass verstehe ich!
Ist halt komisch das er mit der funktion .adress nicht den ganzen Code ausliest.
ich habe mittlerweile auch eine Lösung gefunden (zwar nicht optimal aber es passt so)
Vielen Dank für deine Hilfe!
Anzeige
Wenn Du eine Lösung hast, solltest Du...
17.10.2017 14:27:46
Michael
diese auch hier posten! Es könnte ja jemand anderes einmal in die Verlegenheit kommen, vor dem gleichen Problem zu stehen... Das wäre Dir doch auch recht, oder? So funktionieren Foren!
LG
Michael
;

Forumthreads zu verwandten Themen

Internet Link in EMail durch VBA
Marco

Hallo,
habe ein Programm, daß Outlook Mails im Excel öffnet.
Nun will ich, daß ein Internetlink in der Mail drin steht. z.B "www.hallo.de"
Wenn ich den Text in eine Zelle schreibe, wird der Text zum Link, und der Mauspfeil beim Drüberfahren zur Hand.
Bekommt man das auch über VB...
19.06.2009 18:56:13
Thread-ID: 1083002
4 Beiträge
Kopierten Text in E-Mail einfügen | Herbers Excel-Forum
Urmila
Hallo alle zusammen,
und schon habe ich eine andere Frage...
Mit dem folgenden Code generiere ich eine E-Mail im Excel Dim OutLookJob As Object, mymail As Object, month As Integer, year As Integer month = Format(Date, "MM") year = Format(Date, "YYYY") Set OutLookJob = CreateObject("Outlook....
13.01.2010 15:44:58
Thread-ID: 1129549
5 Beiträge
VBA Hyperlinks ohne Unterstrich und in Schwarz
alex

Hallo
Gibt es eine Möglichkeit mit VBA, Hyperlinks ohne Unterstrich und in Schwarz zu setzen?
Gruß alex
31.01.2010 12:45:51
Thread-ID: 1134546
11 Beiträge
Hyperlink in Mail erstellen
einfachf

Hallo Zusammen,
ich habe ein kleines Problem und hoffe ihr könnt mir helfen.
Ich habe in einem Excel-Blatt einen Link erzeugt
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
pfad & Datei
Cells(CellCount, 3).Select
Nun möchte ich diesen Link per Mail versend...
11.03.2010 10:47:44
Thread-ID: 1145038
5 Beiträge
VBA Hyperlinks durch =HYPERLINK Funktion ersetzen
alex

Hallo zusammen,
Ich bin gerade ein wenig am herumexperimentieren mit meiner Mappe(ich will die Performance sowohl beim speichern als auch beim navigieren durch die Arbeitsmappe erhöhen).
Auf XLimits habe ich gelesen das man Hyperlinks durch die =HYPERLINK funktion ersetzn sollte da das...
20.03.2010 10:38:49
Thread-ID: 1147197
3 Beiträge
x-beliebiege Datei als Hyperlink in E-Mail zeigen
Urmila

Hallo alle zusammen,
ich hoffe ihr könnt mir weiterhelfen.
Ich würde gerne in einer E-Mail nur einen Hyperlink zu einer Datei einfügen.
Das Problem ist nur, die Dateieindung kann immer anders sein, also doc, pdf, xls etc.
Pfad ist immer "C:\Test\", Dateiname steht in Spalte A, a...
08.04.2010 15:45:38
Thread-ID: 1150644
3 Beiträge
E-Mail Adresse hat keinen Hyperlink VBA
andreas

Hallo zusammen,
ich habe hier einen kleinen Code, damit übertrage ich Werte aus einem Formular in eine externe Tabelle.
Wert in Textbox9 ist immer E-Mail Adresse.
Das auslesen funktioniert problemlos, nur hat die Mail-Adresse in der externen Tabelle den Hyperlink nicht.
Da muss...
09.06.2010 11:56:51
Thread-ID: 1161016
3 Beiträge
per vba hyperlink von excel in worddokument
excel

Hallo,
ich öffne in einem makro ein word-dokument und füge dort zellinhalte in textmarken ein.
in einer der zellen steht ein hyperlink. wie bekomme ich es hin, dass ich in word dann auch einen hyperlink habe und nicht nur den text der zelle
Gruß
effha
25.10.2010 19:58:40
Thread-ID: 1183824
3 Beiträge
Attachmentname in E-Mail Nachicht einfügen
Seppel

Hallo VBA Gemeinde,
Über ein Exeldatei lasse ich eine E-Mail generieren, das funktioniert so weit auch alles mit dem hier unten angegbenen Code. Ich möchte aber gern noch in den Mail Body (Nachichtentext) den Namen der angefügten Datei mit einbinden.
Im Nachichtentext wäre das z.B. nach...
24.09.2011 07:05:04
Thread-ID: 1231295
5 Beiträge
HTML Tabelle als Grafik in E-Mail einfügen
steffen

Hallo!
ich habe folgendes Problem und hoffe ich finde hier helle Köpfe die mit weiterhelfen :-)
Ich erstelle autom. eine E-Mail: Dim objOutlook As New Outlook.Application Dim ObjMessage As MailItem Set ObjMessage = objOutlook.CreateItem(olMailItem) With ObjMessage .BodyFormat = 1 .HTML...
05.09.2012 13:22:36
Thread-ID: 1277492
3 Beiträge
Anzeige
einem Objekt per VBA Hyperlink hinzufügen
bruno

hallo
bin an einer Vorlage am kreieren. Dabei mache ich per vba einen Button. Jetzt möchte ich dem noch einen Hyperlink hinzufügen, dass dieser ins erste Register "Übersicht" spring. Doch ich bringe den Code nicht zusammen.
Hat jemand eine Idee?
24.10.2013 21:09:51
Thread-ID: 1335802
5 Beiträge
einem Objekt per VBA Hyperlink hinzufügen
bruno

hallo
bin an einer Vorlage am kreieren. Dabei mache ich per vba einen Button. Jetzt möchte ich dem noch einen Hyperlink hinzufügen, dass dieser ins erste Register "Übersicht" spring. Doch ich bringe den Code nicht zusammen.
Hat jemand eine Idee?
24.10.2013 21:10:12
Thread-ID: 1335803
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Hyperlinks in Emails einfügen

Schritt-für-Schritt-Anleitung

Um einen Hyperlink in eine Email einzufügen, kannst Du VBA in Excel verwenden. Hier ist eine einfache Anleitung, wie Du dies umsetzen kannst:

  1. Öffne den Visual Basic-Editor in Excel (Drücke ALT + F11).

  2. Füge ein neues Modul hinzu: Rechtsklick auf „VBAProject (DeinWorkbook)“ -> Einfügen -> Modul.

  3. Kopiere den folgenden VBA-Code in das Modul:

    Sub send_Email_2()
    Dim olApp As Object
    Dim mbody As String
    Dim Hyperl As String
    Hyperl = Range("C6").Hyperlinks(1).Address ' Hier wird der Hyperlink aus Zelle C6 ausgelesen
    Set olApp = CreateObject("Outlook.Application")
    With olApp.CreateItem(0)
        .Subject = "Test"
        .To = "Test@test.de"
        .CC = "Test_CC@test.de"
        .BCC = "Test_BCC@test.de"
        .HTMLBody = "<a href='" & Hyperl & "'>Hier klicken</a><br>" & mbody
        .Display
    End With
    Set olApp = Nothing
End Sub

  4. Anpassen der Zelle: Stelle sicher, dass der Hyperlink in der Zelle C6 steht oder passe den Zellbezug an.

  5. Führe das Makro aus: Drücke F5, um das Makro auszuführen.

Häufige Fehler und Lösungen

  • Problem: Der Hyperlink wird in der Email nicht korrekt angezeigt.

    • Lösung: Stelle sicher, dass Du den Hyperlink in korrektem HTML-Format übergibst, z.B. <a href='URL'>Linktext</a>.

  • Problem: Der Hyperlink wird nur teilweise übernommen.

    • Lösung: Überprüfe die Länge des Hyperlinks. Wenn der Link zu lang ist, teile ihn in zwei Teile und füge diese zusammen.

  • Problem: Outlook link einfügen geht nicht.

    • Lösung: Stelle sicher, dass Du die richtige Methode verwendest, um den Hyperlink in den HTML-Body der Email einzufügen.

Alternative Methoden

Eine Alternative zum Einfügen von Hyperlinks in Emails ist die Verwendung von HTML-Emails in Gmail. Hier kannst Du den Hyperlink manuell im HTML-Format einfügen:

  1. Erstelle eine neue Email in Gmail.
  2. Klicke auf die drei Punkte in der unteren rechten Ecke und wähle „HTML einfügen“.

  3. Füge den HTML-Code für deinen Link ein, z.B.:

    <a href="https://www.example.com">Hier klicken</a>

Praktische Beispiele

Hier sind einige praktische Beispiele, wie Du einen Dateipfad als Link in eine Email einfügen kannst:

  • Beispiel 1: Wenn Du einen lokalen Dateipfad einfügen möchtest, nutze folgenden Code:

    Hyperl = "file://C:/path/to/your/file.xlsx"

  • Beispiel 2: Um einen Internetlink einzufügen:

    Hyperl = "https://www.example.com"

  • Beispiel 3: Um einen Gmail hyperlink einzufügen, verwende den HTML-Code direkt:

    <a href="mailto:someone@example.com">Email senden</a>

Tipps für Profis

  • Nutze Fehlerbehandlungsroutinen in Deinem VBA-Code, um unerwartete Fehler abzufangen.
  • Wenn Du häufig Email-Versand automatisierst, kann es hilfreich sein, eine Funktion zum Formatieren von Links zu erstellen.
  • Überlege, Daten aus einer Datenbank abzurufen und diese als Hyperlinks in Emails zu verwenden.

FAQ: Häufige Fragen

1. Wie kann ich einen Hyperlink in eine HTML-Email einfügen?
Verwende den HTML-Code <a href='URL'>Linktext</a> innerhalb des .HTMLBody in Deinem VBA-Code.

2. Gibt es eine maximale Zeichenzahl für Hyperlinks?
Ja, einige Email-Clients haben eine Grenze für die Länge der URL. Wenn Du Probleme hast, versuche den Link zu verkürzen oder in zwei Teile zu splitten.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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