View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
[email protected] gopher897@netzero.com is offline
external usenet poster
 
Posts: 1
Default How do I Bring a window to the foreground? *outlook warning

Hello experts,

First of all.. " Stupind Windows security "

That being said...

I use the following bit of code.

Dim ol As Object, myItem As Object
Set ol = CreateObject("outlook.application")
Set myItem = ol.CreateItem(olMailItem)
myItem.To = Range("E2").Value
myItem.Subject = "A NEW PURCHASE ORDER HAS BEEN CREATED"
myItem.Body = "file:" & F & Chr(13) & Chr(13)
myItem.Body = myItem.Body & "This is an automated message"
myItem.Send

How do I make sure that the windows email security warning pops up in
the foreground and not behind the spreadsheet window?