View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
GS[_5_] GS[_5_] is offline
external usenet poster
 
Posts: 226
Default trying to email workbook from VB6, getting error 1004

Mike S was thinking very hard :
I'm using this code from VB6 to open a workbook then email it. The workbook
opens and I can read from it, write to it, format cells, etc, but when I try
to send mail I get an error:

'OutputFile contains a valid path to a working .xls file

Set oExcel = CreateObject("Excel.Application")
oExcel.UserControl = False 'do not let user interact with sheet
Sleep 1000
oExcel.Visible = DisplayExcel
Set oBook = oExcel.Workbooks.Open(OutputFile)
Sleep 1000
oBook.SendMail ", "Excel Email Test"

Run-time error '1004'
Method 'SendMail' of object _Workbook' failed

I would like to be able to send the workbook from any version of Excel 2000
or later, on any OS XP or later, if possible.

Any suggestions would be appreciated.
Mike


Hi Mike,
Is there any reason why you can't execute Excel's FileSend ToMail
Recipient (as attachment) menuitem while the workbook is active?

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc