hi
can someone help me? I need to email an excel worksheet rather than the whole excel work book. any suggestions.
many thanks
andrewm
hi
can someone help me? I need to email an excel worksheet rather than the whole excel work book. any suggestions.
many thanks
andrewm
Only in VB(A), but I'm not that strong on excel commando's
Sub EmailExcelSheet()
Dim myOutlook As Object
Dim myMailItem As Object
Set otlApp = CreateObject("Outlook.Application")
Set otlNewMail = otlApp.CreateItem(olMailItem)
fName = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
With otlNewMail
.To = "[email protected]"
.CC = ""
.Subject = ActiveWorkbook.Name
.Body = "your text" & Chr(13) & Chr(13) & "your text" & ActiveWorkbook.Name & Chr(13) & Chr(13) & "Best Regards," & Chr(13) & "your name" & Chr(13) & Chr(13)
.Attachments.Add fName
.Send
End With
End Sub
I will use this when I have to send daily our orders by email.
Regards,
Maba
When you've got the spreadsheet open, right click on the tab and select
'Move or Copy' then click 'Create copy' box at the bottom, then select
the drop down box at the top then select '(new workbook)'.
This will copy that worksheet into a new workbook which you can then
email.
When you've got the spreadsheet open, right click on the tab and select
'Move or Copy' then click 'Create copy' box at the bottom, then select
the drop down box at the top then select '(new workbook)' then press
OK.
This will copy that worksheet into a new workbook which you can then
email.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks