Out of Office message and Outlook 2003 shutdown

Not open for further replies.



I have a question concerning the 'out of office' function in v2003, on Exchange Server. I have heard that it is possible to set it up so that it will automatically turn on whenever I log off my computer. How do I do that?

Many thanks :)

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
You heard wrong - you need to turn it on and off yourself. If you use Outlook 2007 or 2010 and Exchange 2007/2010, you can set it ahead of time, to run at a specific time.

You can replicate the Outlook 2007/2010 feature of setting OOF ahead of time, using advanced rules and keeping it turned on, but its by the day, not hour, and like outlook 2007/2010, needs updated for the next usage.

You can use VBA to prompt you to set it when you close outlook -

Private Sub Application_Quit()

  Msg = MsgBox("Turn on Out of Office?", vbYesNo)
  If Msg <> vbYes Then Exit Sub

 Set oSession = CreateObject("MAPI.Session")
 oSession.Logon "", "", False, False

 ' Optional: Set the body text.
 'oSession.OutOfOfficeText = "The OOF reply text."

 ' Turning on Out of Office
 oSession.OutOfOffice = True
 Set oSession = Nothing

End Sub
Not open for further replies.