Thread: Emailing Sheets
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Todd Huttenstine[_2_] Todd Huttenstine[_2_] is offline
external usenet poster
 
Posts: 237
Default Emailing Sheets

Below is part of a code I am using to send sheets to
specified email addresses using Outlook2000. Everything
works great accept when it goes to email the sheets this
little box pops up with a status bar saying "A program is
trying to automatically send e-mail on your behalf. Do
you want to allow this?" I have to wait until the blue
status bar gets to 100% and then I can click YES or NO. I
dont want this box to pop up at all. Is there a way to
send these emails without this popup box asking me if I
want to allow this?


With olmail
.To = cell.Offset(0, 1).Value
.Subject = "Your Stats"
.Body = "Here are your stats, " & cell.Value
.Attachments.Add wb.Path & "\" & wb.Name
.Display
.Send
End With


Thank you.