I sent out an email a while ago to several Philosophy departments, and got replies from several individual professors.
I would like to send an email out addressed to all of these professors.
Is there a way to do this that doesn’t involve me typing in or copy/pasting a lot of email addresses? It would be great if I could somehow just highlight all these emails I got and hit a button or two that lets me reply to all of them in one fell stroke…
Some good features in that general direction were added in Office 2010. I’m not sure it does quite what you want though. What Office version are you using?
The macro linked to by Number will send a separate copy of a “master” email individually to each of the selected replying parties. It won’t send a single common email to all of them at once.
It sounds like our OP isn’t up to modifying or improving macros.
Sub ReplyToMultiple()
Set objAddress = CreateObject("Scripting.Dictionary")
objAddress.CompareMode = vbTextCompare
Application.ActiveWindow
For i = 1 To ActiveExplorer.Selection.Count
DoEvents
Set objEmail = ActiveExplorer.Selection.Item(i)
strAddress = objEmail.SenderEmailAddress
If Not objAddress.Exists(strAddress) Then
objAddress.Add strAddress, ""
End If
Next
Set objEmail = ActiveExplorer.Selection.Item(1)
Set objReply = objEmail.Reply
objReply.To = Join(objAddress.Keys, ";")
objReply.Display True
End Sub