Macro to save multiple tabs into pdfs and email it to specific addresses taken from cells.

excelbeginner2021

New Member
Joined
Mar 23, 2021
Messages
1
Office Version
  1. 365
Platform
  1. Windows
I have a workbook in Excel that has multiple tabs. I have a macro that will save all the tabs as a PDF. I would like to add, that the name of the pdf is taken from a particular cell (a1), plus email it via outlook to a specific address in cell (a2).

This is the code I am currently using;

Sub SaveWorksheetAsPDF()



Dim ws As Worksheet



For Each ws In Worksheets



ws.ExportAsFixedFormat xlTypePDF, "C:\Desktop\1010" & ws.Name & ".pdf"



Next ws







End Sub


Can you help me please?
 

Excel Facts

Copy PDF to Excel
Select data in PDF. Paste to Microsoft Word. Copy from Word and paste to Excel.

Watch MrExcel Video

Forum statistics

Threads
1,130,242
Messages
5,641,048
Members
417,190
Latest member
Sdwd76

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top