View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips Bob Phillips is offline
external usenet poster
 
Posts: 1,726
Default Open Outlook from a macro

I just gave you code to test whether Outlook was started, if not start it.

You would add this to some code to send the mail.

--
---
HTH

Bob

(change the xxxx to gmail if mailing direct)


"Corey" wrote in message
...
Thanks for the reply Bob.

Am I suppose to any more than to test the code you posted than to run it
from a macro?
It thinks but does nothing??


Corey....
"Bob Phillips" wrote in message
...
It should do.

To start Outlook, just test it and open it

On Error Resume Next
Set AppOL = GetObject(,"Outlook.Application")
If AppOL Is Nothing Then
Set AppOL = CreateObject("Outlook.Application")
If AppOL Is Nothing Then
MsgBox "Something's up"
Exit Sub
Else
AppOL.Visible = True
End If
End If


--
---
HTH

Bob

(change the xxxx to gmail if mailing direct)


"Corey" wrote in message
...
Thanks for the reply,
But Ron's site is very helpful, yet does not assist me with the OPENING
on Outlook from a Macro.

Corey....
"Jim Thomlinson" wrote in
message ...
Check out this site...

http://www.rondebruin.nl/sendmail.htm
--
HTH...

Jim Thomlinson


"Corey" wrote:

I have a code to send(email) a range of a worksheet to an email addres
on
the sheet.
But if Outlook is not opened it simply sits in the OUTBOX until
Outlook is
opened.
Is ther a line i can add to open Outlook if Not already.
This way it Will send immediately ?

Corey...