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

Forumthread: Link Ordner mit zweiter Zeile in E- Mail

Link Ordner mit zweiter Zeile in E- Mail
18.07.2024 10:59:39
Kater
Hallo zusammen,
ich habe ein VBA, mit dem ich eine E-Mail erstelle, Empfänger und Betreff aus EXCEL herauslese und in die E- Mail eintrage.
Nun möchte ich einen zweiten Text darunter einfügen, in dem der Hinweis und der Link zu dem Ordner, in dem die EXCEL- Datei steht, einfügen.
Es kommen verschiedene Varianten raus aber keine, die richtig ist.
Mein VBA sieht so aus:
Vielen Dank und beste Grüße,
Kater

Sub eMail()
Dim rcp, hlink, msg, subj
rcp = Range("Q14")
subj = Range("S4")
msg = "Hallo, dies ist eine automatisch erzeugte Nachricht! Hier der Link zu EXCEL:" & "%0A%0A" & ""
hlink = "mailto:" & rcp & "?"
hlink = hlink & "subject=" & subj & "&"
hlink = hlink & "body=" & msg
ActiveWorkbook.FollowHyperlink (hlink)
End Sub
Anzeige

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

Betreff
Datum
Anwender
Anzeige
ActiveWorkbook.Path owT
18.07.2024 13:55:15
Michael
 
AW: Link Ordner mit zweiter Zeile in E- Mail
19.07.2024 10:38:35
Ein anderer Michael
Hallo Kater,

schade. Aber dann verstehe ich das Problem nicht richtig. Du wolltest den Pfad zum Ordner. Den bekommst Du so. Vielleicht brauchst Du eine eigene Variable in Deinem Code, damit der Link zum Ordner ein eigener Link wird? Unabhängig von der Excel-Datei.
Das sich Massen-Mails mit Words Seriendruckfunktion erstellen und verschicken lassen, weißt Du? Allein dafür brauchst Du kein Makro. Deine Excel-Datei ist die Datenquelle, der Rest lässt sich womöglich in Word einfach "zusammenklicken".

Viele Grüße
Michael
Anzeige
AW: Link Ordner mit zweiter Zeile in E- Mail
19.07.2024 10:39:32
Michael
Wollte doch offen lassen...und nein, eben, das war kein anderer ;-)
AW: Link Ordner mit zweiter Zeile in E- Mail
22.07.2024 15:23:15
Kater
Hallo zusammen,
habe mein VBA so geändert (die Zeilenumbrüche stimmen in der Ansicht hier nicht):

Sub eMail()
Dim rcp, hlink, msg, subj
rcp = Range("Q14")
subj = Range("S4")
msg = "Text1" & _
"%0A%0A" & "
"\" & ActiveWorkbook.Name & "%0A%0A"
& "Text2" & "%0A%0A" & ActiveWorkbook.Path & ">"
hlink = "mailto:" & rcp & "?"
hlink = hlink & "subject=" & subj & "&"
hlink = hlink & "body=" & msg
ActiveWorkbook.FollowHyperlink (hlink)
End Sub

und bekomme nun dieses Ergebnis:

Text1
file://C:\Users\Name\Desktop\test.xlsm
Text2
C:\Users\Name\Desktop>

Soweit so gut. Das "file://C:..." ist ein Link - soll ja so sein.

Der Pfad, in dem die Datei steht ist nur kein Link...nur Klartext...und wie bekomme ich das ">" nach "Desktop" wieder weg?
...was übersehen ich denn??...
Ich danke euch schon mal im Voraus!!
Anzeige
AW: Link Ordner mit zweiter Zeile in E- Mail
22.07.2024 15:42:05
Kater
Hallo zusammen!
Habe den Fehler gefunden: & "file://" hat vor & ActiveWorkbook.Path gefehlt...

Nur dieses ">" nach Desktop verstehe ich nicht...im Moment sieht es so aus:
file://C:\Users\Name\Desktop>
AW: Link Ordner mit zweiter Zeile in E- Mail
22.07.2024 15:48:53
Michael
Hallo Kater,

was wäre, wenn Du ">" in Deinem Code einfach weglässt?
Am Ende dieser Zeile:
& "Text2" & "%0A%0A" & ActiveWorkbook.Path & ">"

Viele Grüße
Michael
Anzeige
AW: Link Ordner mit zweiter Zeile in E- Mail
22.07.2024 16:03:00
Kater
:-)
Eine gute Idee! Manchmal ist man blind...
Vielen Dank!!!!
:-D
AW: Link Ordner mit zweiter Zeile in E- Mail
19.07.2024 18:26:32
schauan
Hallöchen,

schon mal
ThisWorkbook.Path
oder
ActiveWorkbook.Path

probiert?

%0A%0A sieht eher nicht nach einem Pfad aus ...
AW: Link Ordner mit zweiter Zeile in E- Mail
20.07.2024 19:20:52
Volti
Hallo Andre,
Das sind die Zeichen für den Zeilenumbruch, wie sie in Links verwendet werden müssen, da dort keine Leer- und Sonderzeichen erlaubt sind.
Ich denke, dass ggf. bei Verwendung von Thispath auch hier evtl. Leerzeichen durch %20 ersetzt werden müssen.
Ich würde hier anstatt dieser Linkversion eher via VBA eine ordentliche Mail erstellen, da sind dann alle Möglichkeiten offen.
Gruß Karl-Heinz
Anzeige
AW: Link Ordner mit zweiter Zeile in E- Mail
20.07.2024 19:22:42
Volti
Hallo Andre,
Das sind die Zeichen für den Zeilenumbruch, wie sie in Links verwendet werden müssen, da dort keine Leer- und Sonderzeichen erlaubt sind.
Ich denke, dass ggf. bei Verwendung von Thispath auch hier evtl. Leerzeichen durch %20 ersetzt werden müssen.
Ich würde hier anstatt dieser Linkversion eher via VBA eine ordentliche Mail erstellen, da sind dann alle Möglichkeiten offen.
Gruß Karl-Heinz
Anzeige
AW: Link Ordner mit zweiter Zeile in E- Mail
22.07.2024 09:59:34
Kater
ich danke euch schon mal...werde das Ein oder Andere weiterversuchen!
AW: ActiveWorkbook.Path owT
18.07.2024 15:07:25
Kater
Hallo und "Danke!"
Leider geht das nicht :-(

Ich stelle mir vor, dass so eine E- Mail erstellt wird.

...Hallo, dies ist eine automatisch erzeugte Nachricht
> hier der Link zu Excel

...Hier der Link zu dazugehörigem Ordner:
> hier der Link zum Ordner


Wie gesagt: die Email mit dem Link zum Excel funktioniert, nur nicht die neuen Zeilen mit dem Ordner.
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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