Adapting Existing Code to Offer Option to Save to Existing Folder

Good morning, all!

I have the following code snippet in a longer piece of code developed with your help:

Please Login or Register  to view this content.

It creates a folder in which to deposit one or more worksheets from the master workbook. What I would like to do is to add a checkbox to my user form (this bit I can do) that, when checked, will override the above section of code and instead ask the user to browse to an existing folder. Ideally I'd need this to happen at the start of the routine so that it only has to be done once, and not for each sheet generated. If it's not easy to do, I can live without it, but it would be a nice refinement.

To put this in context, here's the complete code:

Please Login or Register  to view this content.

This section

Please Login or Register  to view this content.

replaces

Please Login or Register  to view this content.

How it works.

Assuming your CheckBox is Named CheckBox1. When checked Folderpicker opens to select a folder. FolderName will be the one you select.

If you should click Cancel in Folderpicker default FolderName will be intiated.

If CheckBox is not checked default folderName will be initiated.

Thank you, Rudi - this seems pretty straightforward. I shall give it a go and let you know how it goes.

Works great, thanks!

Is there a way to make the Shell.Application default to this folder in the folder browser: C:\Users\Alison\OneDrive - Royal Hospital School\Documents\Timetable WIP\2019-20\

Try this.

Please Login or Register  to view this content.

Perfect. Thanks again!

Glad to help and thanks for rep+. Much appreciated.