We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
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 = "firstname.lastname@example.org" '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
|how to get files list form folder which is located on server using client side vb6.0 app||11||26|
|Eclipse Java import and method not resolved||4||73|
|Word 2016: VBA code Style Source checkbox in Reveal Formatting Pane||3||59|
|Word 2013 VBA - How to assign a keyboard shortcut to a Macro||2||20|