Hi there! I have code below which brings up a dialogue box and allows me to sect an excel file. Is there a way to change this code so the dialogue box will ask me to select a folder instead? I want to be able to select a folder and the rest of the code will open the files in the folder.
Sub Euro() Dim wb1 As Workbook Dim sFileName1 As String myMsg = "Please Select Euromcontact Value File" Response = MsgBox(myMsg, vbExclamation + vbOKOnly, myTitle) sFileName1 = Application.GetOpenFilename If sFileName1 = "False" Then Exit Sub Set wb1 = Workbooks.Open(Filename:=sFileName1) With wb1 .Activate End With End Sub
I hope you can help!