I send an attachment with the following code:
myWorkBook = ActiveWorkbook.Name
Sheets(myDASheet).Copy
Application.Dialogs(xlDialogSendMail).Show , myWorkBook
ActiveWorkbook.Saved = True
ActiveWorkbook.Close savechanges:=False
Windows(myWorkBook).Activate
Once I receive it, I cannot open. I get Dr. Watson errors I can open an excel attachment if it was attached from inside outlook ('97).
If it matters, I reference:
VB for Application
MS Excel 8.0 Obj Lib
OLE Automation
MS Office 8.0 Obj Lib
MS Forms 2.0 obj lib
MS DAO 3.51 Obj Lib
Ref Edit Control
VB for extensibility
Any ideas?
myWorkBook = ActiveWorkbook.Name
Sheets(myDASheet).Copy
Application.Dialogs(xlDialogSendMail).Show , myWorkBook
ActiveWorkbook.Saved = True
ActiveWorkbook.Close savechanges:=False
Windows(myWorkBook).Activate
Once I receive it, I cannot open. I get Dr. Watson errors I can open an excel attachment if it was attached from inside outlook ('97).
If it matters, I reference:
VB for Application
MS Excel 8.0 Obj Lib
OLE Automation
MS Office 8.0 Obj Lib
MS Forms 2.0 obj lib
MS DAO 3.51 Obj Lib
Ref Edit Control
VB for extensibility
Any ideas?