Outlook Code Run from Excel

W

WhytheQ

Hello All,

I use the following function in Excel to call outlook before creating
an email. Using Office 2010 I'm finding that even with the correct
setting in the Mail section of our Control Panel that if OL is not
running when the function runs then a window appears asking to Choose
Profile. I've tried commenting out the two marked lines below and it
all seems to run without asking for the profile - would it be logical
to assume that these two lines are connected with the application
asking for a profile ?


Any help much appreciated
Jason.


Private Function OpenOutlook()
On Error Resume Next
Set myOutApp = GetObject(, "Outlook.Application")
If Err.Number = 429 Then
Set myOutApp = CreateObject("Outlook.Application")


'possible offending code>>>>>>>>>>>
' Set myNS = myOutApp.GetNamespace("MAPI")
' myNS.Logon
'>>>>>>>>>>>>>>>>>>>>>>>>>>>>>


End If
On Error GoTo 0
End Function 'OpenOutlook
 
G

GS

AFAIK, just starting Outlook defaults to the current user profile if
one exists. Not sure why you have to specify a profile or even start an
email app using CreateObject since SheeExecute opens the default app
when you specify "mailto:" as one of its args.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top