Log In
Register
Home
New Member
January 13, 2021
Offline
Hi,
I have to send the same quotes every year, but update the dates, and email them out again. I have a looping macro that updates the dates across multiple workbooks that are saved in the same folder, but I haven't figured out yet how to get a similar loop to go through that same folder to create the PDFs and emails. I started with the "Save as PDF and send email macro" from Philip from 2013 and customized it a little bit, and that's working. How can I get it to loop through multiple workbooks? What I was seeing on these forms was for looping through multiple sheets in the same workbook.
Thank you for any help you can offer!
Power Query
Power Pivot
Xtreme Pivot Tables
Excel for Decision Making
Excel for Finance
Excel Analysis Toolpak
Power BI
Excel
Word
Outlook
Excel Expert
Excel Customer Service
PowerPoint
November 8, 2013
Offline
Hi Stephanie,
You can reuse the code you have:
With Workbooks.Open(xFdItem & xFileName)
create_and_email_pdf ' that's all you need, this code works with the active sheet
End With
New Member
January 19, 2021
Offline
Thank you for your response, Catalin! That got me a little bit closer. Before I had to open the sheet myself to get the PDF and email macro to work. Now it will go to the folder and open the sheet just by me picking the folder, but it will only do the first file in the folder, then it stops. Is there a way to get it to create all the PDFs and emails within a specified folder?
Power Query
Power Pivot
Xtreme Pivot Tables
Excel for Decision Making
Excel for Finance
Excel Analysis Toolpak
Power BI
Excel
Word
Outlook
Excel Expert
Excel Customer Service
PowerPoint
November 8, 2013
Offline
The folder dialog is there to ask you where you want to save the generated PDF, not to open all excel files from there.
You can use sample code from this topic to iterate through files in a folder and add your code to open and generate pdf: https://www.myonlinetraininghu.....rof#p17458
1 Guest(s)
