Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
400to404
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
400to404
400to404
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Eine E-Mail mit Anhang aus Excel per Outlook verse

Eine E-Mail mit Anhang aus Excel per Outlook verse
Matthias
Hallo,
ich moechte aus einem Tabellenblatt eine Email verschicken. Das Makro funktioniert auch, aber nur im Editor.
Wenn ich es aber ueber den Commandbutton versuche, passiert nichts.
Was mache ich falsch?
Gruss
Matthias

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

Betreff
Benutzer
Anzeige
AW: Eine E-Mail mit Anhang aus Excel per Outlook verse
Peter
Hallo!
Versuchs mal damit: http://xlfaq.herber.de/texte/121100h.htm
(bzw. ähnl. Beispiele in Excel-Recherche /Suche in Excel-FAQs, Suchwort: "Outlook")
... mit ein bissl Herumspielen läßt sich Dein Problem sicher lösen!
Herzliche Grüße Peter
AW: Eine E-Mail mit Anhang aus Excel per Outlook verse
24.03.2004 15:46:44
Jens
Hallo Matthias!
Versuch es mal hiermit im VBA.

Private Sub CommandButton1_Click()
If CommandButton1 = False Then
ActiveWorkbook.Save
Dim Nachricht As Object, OutApp As Object
Set OutApp = CreateObject("Outlook.Application")
Dim AWB As String
AWB = ThisWorkbook.FullName
InitializeOutlook = True
Set Nachricht = OutApp.CreateItem(0)
With Nachricht
.to = "Empfänger"
.Subject = "Betreff"
.attachments.Add AWB
.Body = "" & vbCrLf & ""
.Display
End With
Set OutApp = Nothing
Set Nachricht = Nothing
End If
End Sub

Gruß
Jens
Anzeige

309 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige