Automating Outlook Out of Office
is it possible to automate the out of office function as i job share and am only in the office 3 days a week, so emails that come in from anyone automatically get the out of office message without me having to set the out of office each week. (In case I forget to set it)
Thanks
Software/Hardware used:
Software/Hardware used:
ASKED:
March 23, 2009 10:45 PM
UPDATED:
November 11, 2011 5:26 PM
RELATED QUESTIONS
- Creating an out of office message when you're a delegate
- Outlook 2003 shared calendar appointment reminder
- Trouble copying large files to NAS - very slow, and often fails
- How do I echo text into a specific place in a text file using a bat file?
- Why are meeting requests being sent out from my Outlook 4 weeks after the due date
Answer Wiki:
I found some Visual Basic Application code that you can use to automate when you close outlook to display an out of message reply.
Here is the code:
Private Sub Application_Quit()
Dim objMAPISession As Object
Set objReminders = Nothing
If MsgBox("Would you like to turn the Out of Office Assistant on?", vbYesNo, "Activate Out of Office Assistant") = vbYes Then
Set objMAPISession = CreateObject("MAPI.Session")
objMAPISession.Logon , , True, False
objMAPISession.OutOfOffice = True
objMAPISession.Logoff
End If
Set objMAPISession = Nothing
End Sub
Here are the instructions to get this going:
1. Open up Outlook.
2. Click Tools->Macros->Visual Basic Editor.
3. If not already expanded, expand Microsoft Office Outlook Objects and select ThisOutlookSession.
4. Copy the code and paste it into the right-hand pane of the VB editor.
5. Click the diskette icon on the toolbar to save the code.
6. Close the VB editor.
7. Click Tools->Macros->Security.
8. Change the security level to Medium.
9. Click Ok.
10. Close Outlook.
11. Start Outlook.
12. You'll receive a dialog-box telling you that ThisOutlookSession contains macros and asking if you want to enable them. Click Enable Macros.
13. Try closing Outlook. When you do a dialog-box should appear asking if you want to turn the Out of Office Assistant on. If you click Yes it will be turned on.
Clicking No will leave it off.
To see all answers submitted to the Answer Wiki: View Answer History.
what mail software (client and server) are you using ?
I expect you are using outlook. What version and service pack level please?
Hi yeah Microsoft Outlook 2007 – I believe it’s SP1.
Cheers
Karl, what a great solution, thanks for posting that!
simple but useful
nice one chap!
This doesn’t appear to be working in Outlook 2007. I receive a Run-time error on Set objMAPISession = CreateObject(“MAPI.Session”).
Any suggestions?
Thanks!
Hi All,
For the above code to work in Outlook 2007 try installing the package at http://www.microsoft.com/download/en/details.aspx?displaylang=en&id=3671. This should solve the problem for run time errors during the code execution.
Thanks,
Pappu.
What should the code be when you have Application_Start()? Need something to run when they turn outlook on and when they logoff.