View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Ron de Bruin Ron de Bruin is offline
external usenet poster
 
Posts: 11,123
Default Copy a worksheet that can be attached to a web-based internet system

Hi Michael , try CDO
http://www.rondebruin.nl/cdo.htm

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm




"Michael Lanier" wrote in message
...
I have designed a workbook so that based upon the following macro, a
designated worksheet ("Sheet1") will be copied and sent to Outlook
where it is mailed.

Private Sub Worksheet_Activate()
ActiveWorkbook.Worksheets("Sheet1").Copy
ActiveWorkbook.SendMail Worksheets("Sheet1").Range("A1"),
Worksheets("Sheet1").Range("A2")
ActiveWorkbook.Close False
'A1 = User's mail | A2 = User's confirmation
End Sub

If I attempt to email a workbook on a computer that does not have
Outlook (Mail, Express), this macro obviously debugs. Therefore, I
need to be able to make a copy that can be easily accessed, renamed
and attached to web-based systems such as hotmail and yahoo. I would
appreciate any help fashioning a macro that will accomplish that
goal. Thanks.

Michael