Outlook macro to prompt user info

vba outlook outlook-addin outlook-2007 outlook-2003
CodeQrius picture CodeQrius · Dec 17, 2010 · Viewed 9.9k times · Source

I want to create a macro for Outlook that will prompt the user to enter their name in an input box, when they hit Send. Once they input the info and click Ok, I want to Append the name to the end of the message and then let the message go. Any ideas?

Answer

Shoban picture Shoban · Dec 17, 2010 
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
SenderName = InputBox("Please enter your name")
Item.Body = Item.Body + SenderName
End Sub

This is a simple script to do the job.

Related questions

Automatically insert email signature into Outlook Meeting Invite

I have been searching the web for a way to do this but no such luck. My goal is to save a meeting agenda template into an email signature which would be inserted into every meeting invite created by me. …

Read More
Save attachments to a folder and rename them

I'm trying to get a VBA macro in Outlook that will save an email's attachment to a specific folder and add the date received to the file name. My googling has gotten me this far: Public Sub saveAttachtoDisk (itm As …

Read More
How to add default signature in Outlook

I am writing a VBA script in Access that creates and auto-populates a few dozen emails. It's been smooth coding so far, but I'm new to Outlook. After creating the mailitem object, how do I add the default signature to …

Read More