Tartalomjegyzék
Ez egy egyszerű példa arra, hogyan küldhet e -mailt az Excelből.
Kattintson ide a bonyolultabb példaért: Küldje el a munkalapot e -mailben külön munkafüzetként. Ez a példa a jelszavas védelemmel és más gyakori problémákkal is foglalkozik.
| 12345678910111213141516171819202122232425262728 | Allevelezési_ munkafüzet ()Application.ScreenUpdating = HamisDim OutApp objektumkéntDim OutMail objektumként'Kezdeti változók létrehozásaSet OutApp = CreateObject ("Outlook.Application")Set OutMail = OutApp.CreateItem (0)'EmailHiba esetén Folytassa a következőtAz OutMail segítségével.to = "[email protected]".CC = "".BCC = "".Subject = "Tárgy".Body = "Törzsszöveg"'.Attachments.Add (FilePath)' Választható, ha rendelkezik melléklettel.Kijelző'.Küldés' Opcionális az e -mailek küldésének automatizálásához.Vége ezzelGoTo 0 hiba eseténSet OutMail = SemmiSet OutApp = SemmiApplication.ScreenUpdating = IgazEnd Sub |
