Innehållsförteckning
Detta är ett enkelt exempel på hur du skickar ett e -postmeddelande från Excel.
Klicka här för ett mer komplext exempel: Skicka kalkylblad via e -post som en separat arbetsbok. Detta exempel behandlar också lösenordsskydd och andra vanliga problem.
| 12345678910111213141516171819202122232425262728 | Sub Mail_Workbook ()Application.ScreenUpdating = FalsktDim OutApp som objektDim OutMail som objekt'Skapa initialvariablerAnge OutApp = CreateObject ("Outlook.Application")Ange OutMail = OutApp.CreateItem (0)'E-postVid fel Återuppta nästaMed OutMail.to = "[email protected]".CC = "".BCC = "".Subject = "Ämne".Body = "Brödtext"'.Attachments.Add (FilePath)' Valfritt om du har en bilaga.Visa'.Skicka' Valfritt för att automatiskt skicka e -post.Sluta medVid fel GoTo 0Set OutMail = IngentingSet OutApp = IngentingApplication.ScreenUpdating = TrueAvsluta Sub |
