Save Each Employee Form to PDF

Hi Billy

I don't know how you wish to incorporate this into your existing Code...for the moment CTRL + q will fire this Code in the attached...

Please Login or Register  to view this content.

Hello,

Thank you for the code jaslake. I changed the path to my desktop ("C:\Users\Bill\Desktop\") and created a folder 'PDF Files' on my desktop. I then assigned the code to the 'Save Forms and Memo to File' button ( I will change this later to say 'Save Forms as PDF to File').

I clicked to run the code and the PDFs of the employees set to yes go on the desktop but not in the file I created. Am I doing something wrong? Also I clicked again and there was only one copy of each which is good I suppose. What if these employees have different training forms later? Can the names of the files have an extension of the type of training to the names so they can go in the file also?



Thank you,
Billy

PS I forgot to put the path for the file so the location and format works perfectly. The extension that I requested will come from Type of Training in D8:G16 merged cells. There will be only one line filled out for that training. I appreciate it very much for your help.

Hi Billy

Replace the Code with this...

Please Login or Register  to view this content.

Hi Billy

How does the code get the names of PDF files? I ask in case I want to perhaps put a hyphen.

The Code looks in Sheets("Personal Information").Range("A:A") for the Employee Number. If found the Code extracts the Employee Name from the same row, Column B (Offset(0, 1)).
The Code looks for a non blank Cell in Range("D8:D16") and sets myTraining to that Value.
The Code then assigns that Name to the File (myFile = empNum.Offset(0, 1) & " " & myTraining).
If you wished to place a Hyphen in the File Name it would probably be here...myFile = empNum.Offset(0, 1) & " - " & myTraining

PS...The Code should probably be checking for Illegal Characters in the File Name ("/$:\'<|>*")...if you wish this to be added let me know.

You're welcome...glad I could help. Thanks for the Rep.