How can IT departments tackle the challenges of a Big Data world? This white paper provides a roadmap to success and helps companies ensure that all their data is safe and secure, no matter if it resides on-premise with physical or virtual machines or in the cloud.
Course Of The Month
5 days, 14 hours left to enrollBecome a Premium Member and unlock a new, free course in leading technologies each month.
Solved
Close Outlook via Access VBA
Posted on 2008-06-18
How can I close Outlook by using VBA code? My RDC users are opening multiple instances of Outlook and that is causing problems/confusion. I'd like to be able, upon opening a new Access form, to check to see if Outlook is open, and if it is, prevent another instance from opening. If Outlook is not open, open it.
Best regards,
Rick Farris
[contact info deleted -- modus_operandi, EE Moderator]
Best regards,
Rick Farris
[contact info deleted -- modus_operandi, EE Moderator]
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
2
2
- +1
6 Comments
Active 3 days ago
Hi, rhfarris.
You'll need something like the code below. GetObject attempts to attach to an open Outlook session. If there is one, then Err.Number will return 0. If there isn't one, then Err.Number will return the error number which will be greater than 0.
You'll need something like the code below. GetObject attempts to attach to an open Outlook session. If there is one, then Err.Number will return 0. If there isn't one, then Err.Number will return the error number which will be greater than 0.
Dim olkApp
On Error Resume Next
Set olkApp = GetObject(,"Outlook.Application")
If Err.Number > 0 Then
'Outlook is not open so open it
Else
'Outlook is already open
End If
Set olkApp = Nothing
Hi Rick,
How is your code doing it currently? If you use the CreateObject function with outlook.application, it will either assign the currently open outlook to the variable, or create a new one if it doesn't exist.
Matt
How is your code doing it currently? If you use the CreateObject function with outlook.application, it will either assign the currently open outlook to the variable, or create a new one if it doesn't exist.
Matt
Dim olApp As Object 'you could also use Outlook.Application'
Set olApp = CreateObject("outlook.application")
'olApp now refers to the already-opened application if it existed, _
or creates a new one if it did not exist'
Sorry BDF, I need to start refreshing again before posting :) Slightly different methods, but I don't like to impede on questions with responses.
Matt
Matt
Active 1 day ago
< How can I close Outlook by using VBA code? My RDC users are opening multiple instances of Outlook and that is causing problems/confusion.>
Dim oOutlook As Object
Dim oNameSpace As Object
Dim oInbox As Object
Set oOutlook = CreateObject("Outlook.Appl
Set oNameSpace = oOutlook.GetNamespace("MAP
Set oInbox = oNameSpace.Folders(1)
oOutlook.Quit '<<< will close all open outlook
Set oInbox = oInbox.Folders("Inbox") 'open a new one
oInbox.Display
Dim oOutlook As Object
Dim oNameSpace As Object
Dim oInbox As Object
Set oOutlook = CreateObject("Outlook.Appl
Set oNameSpace = oOutlook.GetNamespace("MAP
Set oInbox = oNameSpace.Folders(1)
oOutlook.Quit '<<< will close all open outlook
Set oInbox = oInbox.Folders("Inbox") 'open a new one
oInbox.Display
Featured Post
This webinar discusses:
-Common barriers companies experience when moving to the cloud
-How SD-WAN changes the way we look at networks
-Best practices customers should employ moving forward with cloud migration
-What happens behind the scenes of SteelConnect’s one-click button
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
This article describes a method of delivering Word templates for use in merging Access data to Word documents, that requires no computer knowledge on the part of the recipient -- the templates are saved in table fields, and are extracted and install…
If you troubleshoot Outlook for clients, you may want to know a bit more about the OST file before doing your next job. IMAP can cause a lot of drama if removed in the accounts without backing up.
The viewer will learn how to simulate a series of sales calls dependent on a single skill level and learn how to simulate a series of sales calls dependent on two skill levels.
Simulating Independent Sales Calls: Enter .75 into cell C2 – “skill leve…
The viewer will learn how to create a normally distributed random variable in Excel, use a normal distribution to simulate the return on an investment over a period of years, Create a Monte Carlo simulation using a normal random variable, and calcul…
Suggested Courses
Course of the Month5 days, 14 hours left to enroll
705 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.