Open Folder Dialog Box with Combine Files Code

I have the below code which combines workbooks into one sheet. The path to the folder containing the workbooks is specified in the code. However, what I want to do is use the folder open dialog box so that it prompts the user to select the folder where the files are. I've tried various ways of doing this but so far have not been able to figure it out. Can anyone assist? I am hoping to accomplish this without dramatically modifying my existing code. Thank you

Please Login or Register  to view this content.

Something like this maybe:

Please Login or Register  to view this content.

Dom

With events, alerts etc being turned off at the beginning of your code it's also worth building in some error handling to turn them back on should things bomb out for any reason:

Please Login or Register  to view this content.

Dom