Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

email mit anlage versenden

Forumthread: email mit anlage versenden

email mit anlage versenden
30.01.2004 14:33:12
dietmar knoll
hallo
ich möchte aus excel heraus eine email mit outlook versenden und aus einem vordefiniertem verzeichnis eine anlage mitschicken.
können sie mir hier weiterhelfen?
danke
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: email mit anlage versenden
30.01.2004 14:53:32
AndreasS
Hallo,
probiers mal damit:

Sub EmailverschickenAnhang()
Dim outObj As Object
Dim Mail As Object
Dim i As Integer
Set obtObj = CreateObject("Outlook.Application")
Set Mail = outObj.CreateItem(0)
With Mail
.Subject = "Rechnung"
.body = "Bitte angehängte Rechnungen prüfen"
.To = "xyz@xyz.de"
.cc = "xyz@xyz.de"
End With
With Application.FileSearch
.NewSearch
.LookIn = "c:\Rechnungen\"
.SearchSubFolders = True
.FileType = msoFileTypeAllFiles
.Execute
For i = 1 To .FoundFiles.Count
Mail.attachments.Add .FoundFiles(i)
Next i
End With
Mail.display
Set Mail = Nothing
Set ouobj = Nothing
End Sub

gruß Andreas
Anzeige
AW: email mit anlage versenden
30.01.2004 16:34:21
dietmar knoll
Echt toll Danke ! Funktioniert prima !
Dietmar
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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