98.7% Of all customers recommend us, we're so confident about our results we publish all reviews and stats
View Live Stats View ReviewsForum home » Delegate support and help forum » Microsoft Word Training and help » Sending a mail merge email on behalf of my manager
Sending a mail merge email on behalf of my manager
Resolved · High Priority · Version 2016
Jo has attended:
Outlook Advanced course
Word Intermediate course
Excel Intermediate course
Excel Advanced course
Sending a mail merge email on behalf of my manager
Can you advise on sending an email via mail merge on behalf of someone else? I have delegate permissions to send emails from 'my name on behalf of my manager' but I can't seem to send via mail merge without an expensive add-in.
RE: Sending a mail merge email on behalf of my manager
Hi Jo,
Thank you for the forum question.
Easiest method: Get Full Access Permissions, but if you cannot get full access you have other options.
I found the link below which give you an idea of your options.
https://www.msoutlook.info/question/mail-merge-as-a-delegate
If you have VBA knowledge, you can use the example code below, but you will need to amend it to your needs.
Sub FromAnotherUser()
On Error GoTo ErrorHandler
Dim objItem As Outlook.MailItem
Dim intSelected As Integer ' Number of emails selected.
Dim strSentOnBehalfOf As String ' Who we want the email to be from.
Dim intResponse As Integer ' Used to confirm with the user they want to make the change.
intSelected = Application.ActiveExplorer.Selection.Count
strSentOnBehalfOf = "(e-mail address removed)" ' Change this to fit your needs. Make sure you have rights to this account and it is spelled correctly!
' Require that this procedure be called only when a message is selected.
If intSelected = 0 Then
Exit Sub
End If
' Only run this procedure if we are in the Outbox.
If Application.ActiveExplorer.CurrentFolder = "Outbox" Then
' Confirm that user wants to proceed.
intResponse = MsgBox("Are you sure you want to mark these " & intSelected & " messages as being from " & strSentOnBehalfOf & "?", vbYesNoCancel, "Change Sender?")
If intResponse = vbYes Then
For Each objItem In Application.ActiveExplorer.Selection
If objItem.Class = olMail Then
objItem.SentOnBehalfOfName = strSentOnBehalfOf
objItem.Send ' If working offline it won't send yet, only prepares if for sending (same as opening the email in your Outbox and hitting the Send button).
'objItem.Save <- Don't save, otherwise it won't send (email changes from italics to regular font in the Outbox, it needs to be in italics) when back online.
End If
Next
Set objItem = Nothing
End If
End If
Exit Sub 'To Avoid ErrorHandler.
ErrorHandler:
MsgBox "Error #" & Err.Number & " - " & Err.Description, vbOKOnly, "Error"
End Sub
Kind regards
Jens Bonde
Microsoft Office Specialist Trainer
Tel: 0207 987 3777
STL - https://www.stl-training.co.uk
98%+ recommend us
London's leader with UK wide delivery in Microsoft Office training and management training to global brands, FTSE 100, SME's and the public sector
Thu 11 Apr 2019: Automatically marked as resolved.
Training information:
- Microsoft intermediate word training london
- Microsoft word training courses london
- Microsoft word training uk
Welcome. Please choose your application (eg. Excel) and then post your question. Our Microsoft Qualified trainers will then respond within 24 hours (working days). Frequently Asked Questions
Any suggestions, questions or comments? Please post in the Improve the forum thread. |
Word tip:Shortcut keys for creating tablesThere are shortcut keys you can use in Word in order to create tables. |