Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 16:39:00
ältere VBA Codes automatisch neu strukturieren
20.04.2024 16:36:42
Arbeitsblatt Script auslagern in Modul
20.04.2024 16:28:25
zwei Makro in einem zusammenführen?
20.04.2024 15:30:14
Warum Verweis zeigt Falsch an
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1828to1832
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1828to1832
1828to1832
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

E-mail Anhang

E-mail Anhang
19.05.2021 16:43:25
Hoschi.hd@freenet.de
Hallo Zusammen,
Ich bitte um Unterstützung. Für einen automatischen e-mail Versand habe ich bereits ein vbA.
Nun möchte ich noch einen Anhang hinzufügen.
In jeder Zeile habe ich in Spalte"I" den Speicherort und die jeweilige Datei (in diesem Fall .pdf) als Hyperlink hinterlegt (,z.B. c:\eigene Dateien\Test1.pdf).
Kann ich das attachment so programmieren, dass es direkten Bezug auf die Zelle mit dem Hyperlink nimmt und so die entsprechende Datei (oben: Tests.pdf) anhängt?
Danke für eure Mühe und Hilfe.
VG Hoschi

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
max.kaffl@gmx.de
19.05.2021 17:19:18
max.kaffl@gmx.de
Hallo Hoschi,
echte Hyperlins oder die Tabellenfunktion HYPERLINK?
Gruß
Nepumuk
AW: max.kaffl@gmx.de
19.05.2021 19:07:31
Hoschi
Hallo Nepumuk,
Echte Hyperlinks. Bei nklicken öffnen sich die entsprechenden Dateien.
VG Hoschi
AW: Email Anhang aus Hyperlink
20.05.2021 07:24:55
max.kaffl@gmx.de
Hallo Hoschi,
so:

Attachments.Add Cells(Zeile, 1).Hyperlinks(1).Address
Gruß
Nepumuk
AW: Email Anhang aus Hyperlink
20.05.2021 15:02:50
Hoschi
Hallo Nepumuk,
vielen Dank! Es wird jetzt ein Laufzeitfehler 9 (außerhalb Bereich) angezeigt. Ich denke ich habe hier ein Problem mit "echter" Hyperlink und Hyperlink lt. Tabellenkalkulation. In meiner ursprünglichen excel Datei verweise ich mit einem link auf ein pdf Dokument mit dem Speicherort und Dateiname (C:\eigene Dateien\Test1.pdf). Bei anklicken öffnet sich die entsprechende Datei Kann es sein, dass es somit kein echter Hyperlink ist? Scheinbar findet vba in Spalte x keinen Hyperlink. Wie sieht denn ein "echter" Hyperlink aus? Vielleicht weißt du auch noch andere Ursachen!?
Sorry und vielen Dank für deine Mühe.
VG
Hoschi
Anzeige
AW: Email Anhang aus Hyperlink
20.05.2021 15:10:28
Nepumuk
Hallo Hoschi,
ein echter Hyperlink: Rechtsklick auf die Zelle - Link
Hyperlink per Formel: =HYPERLINK(Zellbezug; Friendlyname)
Gruß
Nepumuk
AW: Email Anhang aus Hyperlink
20.05.2021 15:13:50
Hoschi
=HYPERLINK("C:\Users\moben\Downloads\document_upload (2).pdf")
Dann müsste das doch ein echter Hyperlink sein...
AW: Email Anhang aus Hyperlink
20.05.2021 15:21:09
Nepumuk
Hallo Hoschi,
nein, das ist die Tabellenfunktion HYPERLINK. Wenn du keinen FriendlyNamye angegeben hast, dann kannst du die Value-Eigenschaft der Zellen benutzen um das als Attachements zu anzuwenden. Ansonsten wird es schwierig.
Gruß
Nepumuk
AW: Email Anhang aus Hyperlink
21.05.2021 00:39:36
Hoschi
Hallo Nepumuk,
nochmals Danke. Ich habe jetzt wie folgt verschlüsselt
Attachments.Add (Cells(i,"I").Value)
In Spalte "I" steht somit der Hyperlink. Klappt auch gut und wird automatisch an die e-mail angehängt. Wenn aber in Spalte "I" nichts steht - und ich möchte trotzdem die e-mail versenden wird das Makro mit Fehlermeldung '440' nicht ausgeführt.
Wie kann ich das darstellen, dass die e-mail auch dann versandt wird, wenn in Spalte "I" kein Hyperlink oder einfach nichts steht?
VG
Hoschi
Anzeige
AW: Email Anhang aus Hyperlink
21.05.2021 09:52:24
Nepumuk
Hallo Hoschi,
so:

If Not IsEmpty(Cells(i, "I").Value) Then Attachments.Add Cells(i, "I").Value
Gruß
Nepumuk
AW: Email Anhang aus Hyperlink
21.05.2021 23:15:36
Hoschi
Hallo Nepumuk,
toll! Das war`s dann von meiner Seite. Vielen Dank für deine kompetente und schnelle Hilfe
Viele Grüße
Hoschi

123 Forumthreads zu ähnlichen Themen

E-Mailversand mit Anhang
Timo

Hallo ich benutze folgenden Code um mir wenn in Spalte C ein Ja steht, eine Mail an die Mailadresse aus Spalte A zu senden! Ich hab alles in einer Userform! Wo sich auch die Listbox1 befindet wo ich den oder die Dateipfad(e) für den Anhang stehen habe!
Wenn ich meine Schleife jetzt durchlau...
11.11.2008 15:07:00
Thread-ID: 1023575
2 Beiträge
Anzeige
e-Mail-Versand mit PDF-Anhang
kutzmutz

Hallo nochmal,
ich hab noch ein Problem mit dem eMail-Versand.
Ich generiere mir eine Liste. Diese will ich als PDF-Anhang in einer e-Mail verschicken. Der Macro-Rekoder hat mir dazu folgendes geliefert:
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\...
06.06.2009 16:06:45
Thread-ID: 1079612
2 Beiträge
Serien-Mail mit Anhang
Boulbadaoui

Hallo,
ich versuche mit dem folgenden Makros, einen Serienmail zu gestalten, leider bekomme ich immer die Zeitlauffehlermeldung 7225!
_____________________________________________________________
Sub testmail() Dim i, empfänger, anlagen, titel, mailtext, An As Variant Dim Entwurf...
26.06.2009 14:47:56
Thread-ID: 1084609
2 Beiträge
Anzeige
Email als Einfügen und Anhang senden
Volker

Hallo liebe Excel- Gemeinde,
habe da mal wieder ein Problem mit Excel und dem versenden von einer Exceldatei.
Den Code habe ich aus dem Forum, ein wenig abgeändert. Leider ist das Ergebnis nicht "vollkommen" wie ich es haben wollte
https://www.herber.de/bbs/user/65540.xls
Ich b...
03.11.2009 07:22:25
Thread-ID: 1113911
6 Beiträge
Email mit Anhang, falls Anhang verfügbar
Thomas

Hallo zusammen,
ich hänge gerade wieder an einer Stelle.
Ich habe ein Makro, welches vollautomatisch täglich Emails aus Excel mit 2 pdf-Dateien im Anhang versendet. Es werden ca. 50 Emails verschickt. Jede Mail an unterschiedliche Empfänger und mit unterschieldlichen pdf - Anhängen. Die...
02.12.2009 08:53:16
Thread-ID: 1121328
3 Beiträge
Email mit Anhang versenden ueber outlook
abu

Hallo Zusammen,
habe folgenden Code gefunden und wuerde den gerne fuer meine Beduerfnisse umstricken. Leider bekomme ich immer eine Fehlermeldung bei dieser Zeile:
.SaveAs TempFilePath & TempFileName & FileExtStr, FileFormat:=FileFormatNum
Wuerde mich ueber hilfe sehr freuen...
16.12.2009 13:28:45
Thread-ID: 1122907
2 Beiträge
Lotus-Notes-Mail mit Anhang aus Excel
Wilfried

Hallo und guten Tag,
folgendes Makro habe ich im Forum gefunden. Es bleibt immer an der Zeile
(Set MailDoc = Maildb.CREATEDOCUMENT) stehen, warum? ... und was muss ich tun, damit der Code mit abgespeichert wird?
Sub SendNotesMail() Dim Maildb As Object Dim MailDbName As String Dim M...
13.01.2010 14:25:25
Thread-ID: 1129487
2 Beiträge
PDF als Email Anhang senden
Matthias

Ich möchte mit Excel 2007 Bordmitteln aus einer Arbeitsmappe ein PDF Dokument wandeln und dieses als Anhang per Email versenden.
Also den Weg über Office/Senden/PDF-E-Mail-Anlage... automatisieren
Im Netz habe so einen Fall nicht finden können.
Der Makrorekorder liefert auch keine b...
13.07.2010 13:48:16
Thread-ID: 1166826
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
2
1
1
6
5
2
1
1
2
6
2
2
3
14
2
1
3
1
29
2
4
2
1
6