Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.
Sub Email() Dim ol As Object 'outlook application object Set ol = CreateObject("Outlook.Application") 'create an instance of the outlook application Dim olItem As Object 'outlook mail object Set olItem = ol.CreateItem(0) 'create an instance of an outlook mail object...the 0 indicates you are creating an emial 'using the email object With olItem .To = "email@example.com" 'email addressee .Subject = "Subject" 'email subject .Body = "Message" 'email message .Attachments.Add ActiveDocument.FullName 'full path and name of active document to attach to the email .Display 'show the email (user need to click the send button) '.Send 'sends the email (Outlook security prompt will appear) End With 'clear the outlook mail object Set olItem = Nothing 'clear the outlook application object Set ol = Nothing End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Word 2016 Workgroup Template GPO not applying.||6||54|
|Mutiple Folder view (5 Folder view)||3||82|
|Open Dialog box to specific folder||2||28|
|Best laptop programming computer for Windows development||14||87|
Join the community of 500,000 technology professionals and ask your questions.