Det er mange grunner til å sende mail fra en Excel makro . For eksempel når en salgssum når en viss verdi , kan en leder vil vite med en gang . Mens det er noen måter å sende e-post fra en Excel makro , er den mest brukte metoden for å utnytte Outlook. Det er et problem hvis du ikke har Outlook installert på datamaskinen du bruker for å åpne regnearket. I så fall kan du bruke CDO , som står for Collaboration Data Object , i stedet. Instruksjoner
en

Trykk " Alt " og " F11 " samtidig fra Excel regneark til å åpne den innebygde Visual Basic-redigering .
2

Kopier og lim følgende kode inn i det tomme kode vinduet: Sub CDO_Mail_Small_Text ( ) Dim iMsg Som ObjectDim iConf Som ObjectDim strbody As String ' Dim Flds Som Variant

Set iMsg = CreateObject ( " CDO.Message ") Set iConf = = 2 ' . Element ( " http://schemas.microsoft.com/cdo/configuration/smtpserver ") _ ' = " Fyll inn din SMTP server her " ' . Element ( " http://schemas.microsoft.com/cdo /konfigurasjon /smtpserverport ") = 25 ' . Update ' End With

strbody =" Hei "& vbNewLine & vbNewLine & _" Dette er linje 1 "& vbNewLine & _" Dette er linje 2 "& vbNewLine & _" Dette er linje 3 "& vbNewLine & _" Dette er linje 4 "
p Med iMsgSet . Configuration = iConf.To = " [email protected] " . CC = "" . BCC = "" . Fra = "" "Person" " < [email protected] >" . Emne = "Subject line" . TextBody = strbody.SendEnd Med

End sub
3

Erstatt " Fyll inn din SMTP server her " med adressen til SMTP- serveren du ønsker å bruke.
4

Trykk " F5 " for å kjøre makroen og sende e-postmeldingen .