How to insert text into Outlook email editor using VBA

by

InsertBefore Method or InsertAfter Method

Inspector.WordEditor Property (Outlook)

Application.ActiveInspector Method (Outlook)

Example

Option Explicit
Public Sub Example()
    Dim Inspector As Outlook.Inspector
    Dim wdDoc As Word.Document
    Dim Selection As Word.Selection
        

    Set Inspector = Application.ActiveInspector()
    Set wdDoc = Inspector.WordEditor
    Set Selection = wdDoc.Application.Selection
        Selection.InsertBefore Format(Now, "DD/MM/YYYY")
    
    
    Set Inspector = Nothing
    Set wdDoc = Nothing
    Set Selection = Nothing
End Sub

enter image description here

Reference to Microsoft Word xx.x Object Library

Go to Outlook VBA editor either by pressing "Alt + F11" keys or clicking on the "Visual Basic" button in the “Developer” ribbon.

  • 1. In VBA editor window, click the “Tools” button in the menu bar.

  • 2. Then, from the drop down list, select the “References” option.

enter image description here

  • 3. In the dialog box, you can pull the scrolling bar down until you locate what you want, such as “Microsoft Word XX.X Object Library”.

enter image description here

More Related Contents:

  1. How to move each emails from inbox to a sub-folder [duplicate]
  2. Outlook Reply or ReplyAll to an Email
  3. How do you extract email addresses from the ‘To’ field in outlook?
  4. How to add default signature in Outlook
  5. Get list of sub-directories in VBA
  6. For Each loop: Some items get skipped when looping through Outlook mailbox to delete items
  7. Save attachments to a folder and rename them
  8. Sending HTTP requests with VBA from Word
  9. VBA Search in Outlook
  10. How to do late binding in VBA?
  11. Check for the senderEmailAddress
  12. Getting the headings from a Word document
  13. What is behind this difference in parentheses effect in VBA?
  14. How do I open an outlook .msg file from my harddrive that is NOT in outlook?
  15. Running VBA from a HYPERLINK()
  16. How to send mail when the .Send does not work?
  17. When is a MailItem not a MailItem? [closed]
  18. Search structured text in Outlook body
  19. Switching the FROM Inbox
  20. How to send email to multiple recipients with addresses stored in Excel?
  21. How to add an embedded image to an HTML message in Outlook 2010
  22. Speed up multiple replacement
  23. Iterate all email items in a specific Outlook folder
  24. Repeating Microsoft Word VBA until no search results found
  25. Macro to update all fields in a word document
  26. MS Access VBA: Sending an email through Outlook [closed]
  27. Where does Outlook store the VBA code files?
  28. Working with current open email
  29. To find and replace a text in the whole document in MS Word 2010 (including tables)
  30. Runtime error 287. Sending Emails through Outlook using VBA in Access

Leave a Comment