mattyb89
08-07-2012, 11:15 PM
Hello,
So my knowledge of VB is basic but i do still understand ...
I have the following code ..
Sub Macro2()
'
' Macro2 Macro
'
'
Sheets("REPORT DETAILED ").Select
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:="Health Check Detailed.pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=False, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
Application.Dialogs(xlDialogSendMail).Show _
arg1:=Sheets("HEALTHCHECK").Range("AP19"), _
arg2:=Sheets("HEALTHCHECK").Range("AP20")
End Sub
This is ment to attach the worksheet "Detailed Report" as a PDF. So far i can get it reference the email and the subject but how do i add a body part ?
Also the attached file only comes across as an excel file, and its the whole book.
Any help would be appreciated.
Thanks
So my knowledge of VB is basic but i do still understand ...
I have the following code ..
Sub Macro2()
'
' Macro2 Macro
'
'
Sheets("REPORT DETAILED ").Select
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:="Health Check Detailed.pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=False, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
Application.Dialogs(xlDialogSendMail).Show _
arg1:=Sheets("HEALTHCHECK").Range("AP19"), _
arg2:=Sheets("HEALTHCHECK").Range("AP20")
End Sub
This is ment to attach the worksheet "Detailed Report" as a PDF. So far i can get it reference the email and the subject but how do i add a body part ?
Also the attached file only comes across as an excel file, and its the whole book.
Any help would be appreciated.
Thanks