Es gibt viele Gründe, um E-Mail aus einer Excel- Makro zu senden. Zum Beispiel , wenn ein Umsatz Summe einen bestimmten Wert erreicht, kann ein Manager will sofort wissen . Zwar gibt es ein paar Möglichkeiten, um E-Mail aus einer Excel- Makro senden, ist die am häufigsten verwendete Methode, um Outlook zu nutzen. Das ist ein Problem , wenn Sie nicht über Outlook auf dem Computer, den Sie verwenden, um die Tabelle zu öffnen sind installiert . In diesem Fall können Sie CDO , die für Collaboration Data Object steht , statt . Anleitung
1

Presse "Alt " und " F11 " in der gleichen Zeit von der Excel-Tabelle , um die integrierte Visual Basic- Editor.
2

Kopieren und Einfügen öffnen Mit dem folgenden Code in das leere Codefenster : Sub CDO_Mail_Small_Text () Dim IMSG Wie ObjectDim ICONF Wie ObjectDim strBody As String ' Dim Flds As Variant

Set IMSG = CreateObject (" CDO.Message " ) Set ICONF = = 2 '. Artikelnummer ( " http://schemas.microsoft.com/cdo/configuration/smtpserver " ) _' = " Bitte geben Sie Ihre SMTP-Server hier '." Artikel ( " http://schemas.microsoft.com/cdo /configuration /SMTPServerPort " ) = 25 " . Aktualisieren ' End With

strBody = " Hallo zusammen " & vbNewLine & vbNewLine & _ " Dies ist Zeile 1 " & vbNewLine & _ " Diese ist Zeile 2 "& vbNewLine & _" Dies ist Zeile 3 " & vbNewLine & _" Dies ist Zeile 4 "

iMsgSet . Konfiguration = iConf.To =" person@email.com " . CC = "" . BCC = "" . From = " " "Person" " < person@email.com > " . Subject = " Betreff-Zeile " . TextBody = strbody.SendEnd mit