make email add forward the work sheet
 

hi
how do i make email add forward the work sheet.
i hav added a hypolink the the email add but i need it to forward the
page to the email add as a att if possible?
any ideas?
cheers toecutter


--
toecutter
------------------------------------------------------------------------
toecutter's Profile: http://www.excelforum.com/member.php...o&userid=27545
View this thread: http://www.excelforum.com/showthread...hreadid=470710

make email add forward the work sheet
 

found this in a earlyer post

Sub SendOneSheet()

Dim olApp As Outlook.Application
Dim olMail As MailItem

Set olApp = New Outlook.Application
Set olMail = olApp.CreateItem(olMailItem)

ThisWorkbook.Sheets(2).Copy

ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & _
"Order.xls"

With olMail
..Recipients.Add "
..Subject = "That one sheet"
..Body = "Here you go" & vbCrLf
..Attachments.Add ActiveWorkbook.Order.xls
..Display
End With

ActiveWorkbook.Close False

Kill ThisWorkbook.Path & "\" & "Sheet2.xls"

Set olMail = Nothing
Set olApp = Nothing

End Sub

but dos not work for me?
what am i doing wrong?
pls help
toecutter


--
toecutter
------------------------------------------------------------------------
toecutter's Profile: http://www.excelforum.com/member.php...o&userid=27545
View this thread: http://www.excelforum.com/showthread...hreadid=470710

make email add forward the work sheet
 

toecutter Wrote:
hi
how do i make email add forward the work sheet.
i hav added a hypolink the the email add but i need it to forward the
page to the email add as a att if possible?
any ideas?
cheers toecutter


i carnt belive no one nose how to do this.
i thought it would be simple for an exsperienced person:(


--
toecutter
------------------------------------------------------------------------
toecutter's Profile: http://www.excelforum.com/member.php...o&userid=27545
View this thread: http://www.excelforum.com/showthread...hreadid=470710