| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
E-mail automation
Hello, I have the following macro started. It opens a new mail form and
converts my excel file into a PDF ready to be sent. Is there anyway to add code that will complete the To: section and actually mail the file automatically? Sub Mail() ' ' Mail Macro ' ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\DOCUME~1\G2844JF\LOCALS~1\Temp\Copy of MASTER Production Meeting.pdf", _ Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas _ :=False, OpenAfterPublish:=False Application.Dialogs(xlDialogSendMail).Show End Sub -- Thank you for your time! John -- Thank you for your time! John |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
E-mail automation
Check out this link...
http://www.rondebruin.nl/sendmail.htm -- HTH... Jim Thomlinson "Very Basic User" wrote: Hello, I have the following macro started. It opens a new mail form and converts my excel file into a PDF ready to be sent. Is there anyway to add code that will complete the To: section and actually mail the file automatically? Sub Mail() ' ' Mail Macro ' ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\DOCUME~1\G2844JF\LOCALS~1\Temp\Copy of MASTER Production Meeting.pdf", _ Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas _ :=False, OpenAfterPublish:=False Application.Dialogs(xlDialogSendMail).Show End Sub -- Thank you for your time! John -- Thank you for your time! John |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
E-mail automation
If you use Outlook see
http://www.rondebruin.nl/pdf.htm -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Very Basic User" wrote in message ... Hello, I have the following macro started. It opens a new mail form and converts my excel file into a PDF ready to be sent. Is there anyway to add code that will complete the To: section and actually mail the file automatically? Sub Mail() ' ' Mail Macro ' ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\DOCUME~1\G2844JF\LOCALS~1\Temp\Copy of MASTER Production Meeting.pdf", _ Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas _ :=False, OpenAfterPublish:=False Application.Dialogs(xlDialogSendMail).Show End Sub -- Thank you for your time! John -- Thank you for your time! John |
|
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
E-mail automation
Great site, thank you
-- Thank you for your time! John "Jim Thomlinson" wrote: Check out this link... http://www.rondebruin.nl/sendmail.htm -- HTH... Jim Thomlinson "Very Basic User" wrote: Hello, I have the following macro started. It opens a new mail form and converts my excel file into a PDF ready to be sent. Is there anyway to add code that will complete the To: section and actually mail the file automatically? Sub Mail() ' ' Mail Macro ' ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\DOCUME~1\G2844JF\LOCALS~1\Temp\Copy of MASTER Production Meeting.pdf", _ Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas _ :=False, OpenAfterPublish:=False Application.Dialogs(xlDialogSendMail).Show End Sub -- Thank you for your time! John -- Thank you for your time! John |
|
#5
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
E-mail automation
Incredible stuff, thank you
-- Thank you for your time! John "Ron de Bruin" wrote: If you use Outlook see http://www.rondebruin.nl/pdf.htm -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Very Basic User" wrote in message ... Hello, I have the following macro started. It opens a new mail form and converts my excel file into a PDF ready to be sent. Is there anyway to add code that will complete the To: section and actually mail the file automatically? Sub Mail() ' ' Mail Macro ' ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\DOCUME~1\G2844JF\LOCALS~1\Temp\Copy of MASTER Production Meeting.pdf", _ Quality:=xlQualityStandard, IncludeDocProperties:=False, IgnorePrintAreas _ :=False, OpenAfterPublish:=False Application.Dialogs(xlDialogSendMail).Show End Sub -- Thank you for your time! John -- Thank you for your time! John . |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How do I do an e-mail mail merge using an Excel spreadsheet? | Excel Worksheet Functions | |||
| E-Mail attachment to same e-mail address in Outlook | Excel Discussion (Misc queries) | |||
| Mail Merge Automation | Excel Discussion (Misc queries) | |||
| Error: cannot load the mail service. Check your mail installation. | Excel Discussion (Misc queries) | |||
| General mail failure when sending e-mail from Excel | Excel Discussion (Misc queries) | |||
Linear Mode
