Asking user to specify a directory

[GeneralShamu]

I am trying to run code on all the XLS files in a directory. I want the user to specify what directory they want to execute the code on though.

I don't want this to be done by the user typing out the directory but selecting it as they would a file.

Does anyone know how to do this?

Application.GetOpenFilename(FileFilter:="Excel Files (*.XLS), *.XLS", Title:="Select File To Be Opened")
is what is used for the user selecting a single file/workbook.

 

[AlphaFrog]

Try something like this...
<font face=Courier New>    <SPAN style="color:#007F00">' Prompt user to select a folder</SPAN><br>    <SPAN style="color:#00007F">With</SPAN> Application.FileDialog(msoFileDialogFolderPicker)<br>        .InitialFileName = "C:\Temp\"               <SPAN style="color:#007F00">' Default path</SPAN><br>        .Title = "Please Select a Folder"<br>        .ButtonName = "Select Folder"<br>        .AllowMultiSelect = <SPAN style="color:#00007F">False</SPAN><br>        .Show<br>        <SPAN style="color:#00007F">If</SPAN> .SelectedItems.Count = 0 <SPAN style="color:#00007F">Then</SPAN> <SPAN style="color:#00007F">Exit</SPAN> <SPAN style="color:#00007F">Sub</SPAN>   <SPAN style="color:#007F00">' User clicked cancel</SPAN><br>        MyPath = .SelectedItems.Item(1)<br>    <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">With</SPAN></FONT>

 

[GeneralShamu]

Thank you AlphaFrog, this worked beautifully!