Reply from recipient

Status
Not open for further replies.

nairad250

Member
Outlook version
Email Account
Exchange Server
Okay, I'm having a bear of a time finding anything online to help me. Keep in mind I am quite new to VBA.




Currently using Office 2007 on WinXp but my organization will be upgrading to Office 2010 and Win7 in the fall.




Here's what I need to do:


My group has a shared folder where emails to "Group1@organization.com" are sent where anyone in my group can view/ reply to messages.




I want to have Outlook automatically (using VBA) to set the "From" field to match what address it was originally sent to (either my own account, or the shared account). As of now, we have to do it manually by showing the "From" line and typing in the address.




Caveats:




  • Our IT dept does not allow us to set these up as Outlook accounts and we cannot add them into our email accounts.

  • Emails may have multiple recipients so we'll have to search for the address in the recipient line.




It's fine to put the from addresses in the code ("Group1@organization.com" and "Me@organization.com") rather than referencing them. I think it's easier to alter the code for each person in my group.




Thanks in advance!!!
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
I've been playing with this and I can see a few issues that will make it more difficult. First, if there are more than one addresses in the to field or if you are cc'd, you would need more complicated code.

If clicking a button to reply from Group1 would suffice, that is possible (and i have some code sample already that will do this.) You'd read the message and decide which account to reply from and click the button instead of the standard reply button.

I also have code that uses the From address in a selected message as the From address on a new message.
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
Try this code - create a button for this macro on the QAT and click it when you want to reply. This code works with selected messages in the message list, i didn't test it with an opened message. It can be used for new messages too with a little tweaking.

Code:
Public Sub New_Reply() 
 
Dim oAccount As Outlook.Account 
 
Dim oMail As Outlook.MailItem
   Set oMail = Application.ActiveExplorer.Selection(1).Reply
     oMail.SentOnBehalfOfName = "email@address.com"
   
   oMail.Display 
 
End Sub

Code:
Public Sub New_Mail() 
 
Dim oAccount As Outlook.Account 
 
Dim oMail As Outlook.MailItem
Set oMail = Application.CreateItem(olMailItem)
     oMail.SendUsingAccount = account-name
     oMail.Display 
 
End Sub

code comes from http://www.slipstick.com/outlook/2010/multiple-accounts-and-the-default-account/2/#2 and http://www.slipstick.com/outlook/email/choose-the-account-to-send-a-reply-from/
 

nairad250

Member
Outlook version
Email Account
Exchange Server
Oh, that is great- you are awesome!

I'm surprised at how simple the code ended up being. The other stuff I was trying using code written to use other accounts was quite long.

Also, FYI on the second bit where you had "oMail.SendUsingAccount = account-name" I had to change it to 'oMail.SentOnBehalfOfName = "email@address.com"'

Thanks again!
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
broadbander Needing help with reply/reply all while keeping attachments and adding a new CC recipient. Outlook VBA and Custom Forms 5
nmanikrishnan Auto-reply from default account Using Outlook 1
P Automatic Greeting "Hello Name," when Reply All is clicked Outlook VBA and Custom Forms 1
N Line to move origEmail to subfolder within a reply macro Outlook VBA and Custom Forms 0
A Outlook 2016 Macro to Reply, ReplyAll, or Forward(but with composing new email) Outlook VBA and Custom Forms 0
S How to find emails that I sent that have not received a reply? Using Outlook 7
T Macro to move reply and original message to folder Outlook VBA and Custom Forms 6
A Is there an ID field you can use to pair a reply to the sent email? Outlook VBA and Custom Forms 4
W Reply to email Using Outlook 4
A Edit attachment Save and Reply Outlook VBA and Custom Forms 0
L Macro/VBA to Reply All, with the original attachments Outlook VBA and Custom Forms 2
S Outlook Macro to move reply mail based on the key word in the subjectline Outlook VBA and Custom Forms 0
diver864 vba for a rule to automatically accept meeting requests with 'vacation' in subject, change to all-day event, change to free, don't send reply Outlook VBA and Custom Forms 1
B Adding signature to bottom of VBA reply email Outlook VBA and Custom Forms 1
C UDFs Reply vs Forward Outlook VBA and Custom Forms 3
ThinkToday Calculate reply time of outlook mail Using Outlook 1
W Replyin to the reply-to email address Outlook VBA and Custom Forms 0
D Reply with a template loose the sender's embedded image Outlook VBA and Custom Forms 0
R List folders in a combo box + select folder + move emails from inbox to that folder + reply to that email Outlook VBA and Custom Forms 1
J Outlook Reply > From > Other Email Address... > Address Not Showing in Sent Items... From Email Outlook VBA and Custom Forms 0
M Delete headers in Inline reply Outlook VBA and Custom Forms 5
E reply Using Outlook 0
Healy Consultants Macro to remove inside organization distribution list email address when reply to all recepients Outlook VBA and Custom Forms 0
B resend if no reply and send an automatic reminder Outlook VBA and Custom Forms 0
evdbogaard Reply with only last message cited Using Outlook 1
B Reply and replyall macro is not working Outlook VBA and Custom Forms 1
mctabish Setting "Reply To" based on inbox Outlook VBA and Custom Forms 2
Rupert Dragwater Deleted email address keeps showing up in reply Using Outlook 12
B When working on emails in a certain folder, when I hit reply or reply all, I would like it re always reply all and add an email address to send to Outlook VBA and Custom Forms 3
R How Do I insert images in and Auto Reply Using Outlook 3
D Disable or hide "reply" and "reply to all" and "forward" in email from access vba Outlook VBA and Custom Forms 1
M Reply Inline With a Outlook Template Outlook VBA and Custom Forms 6
O On click,I want to change subject line of selected mail and then reply to particular email and move Using Outlook 3
J VBA Run When Reply Outlook VBA and Custom Forms 4
D Font in Reply is much larger than normal, how to reset ...? Using Outlook 4
K add pdf to every reply or forward Outlook VBA and Custom Forms 1
A VB to "reply all" email items stored in a folder of outlook with adding a new message Outlook VBA and Custom Forms 0
K Extract email address from body and auto-reply outlook Using Outlook 1
T In-line reply style in Outlook Outlook VBA and Custom Forms 20
Vijay Reply all by attachment name Using Outlook 10
N Lookup Value From Excel and Reply With Matching Value Using Outlook 0
G Outlook 2016: reply icon not showing when replied from mobile Using Outlook 3
J Remove extra line above signature in reply Outlook VBA and Custom Forms 5
ashcosta2 Auto Reply rule based on speficied time Outlook VBA and Custom Forms 0
C Outlook Attachment List in Reply Header Using Outlook 3
D Reply Problem with Outlook.com account Using Outlook.com accounts in Outlook 0
H send reminder if no reply received on first or original email using macro Using Outlook 2
Diane Poremsky Reply to All Includes My Address Using Outlook 0
F Room Mailbox Reply Exchange Server Administration 0
N How to add Dear & mail receipts name while reply to that mail in outlook2007 Outlook VBA and Custom Forms 1

Similar threads

Top