I got this macro that opens all the files in the folder where the already opened file is located.It was functioning normally.
However, now I am using the Excel 2010 and it is not working anymore.
Which adjustment should I make it it still works in excel 2010?
Dim i As Integer, wb As Workbook
On Error Resume Next
.LookIn = ActiveWorkbook.Path
.SearchSubFolders = False
.Filename = "*.xls"
For i = 1 To .FoundFiles.Count
Set wb = Workbooks.Open(Filename:=.FoundFiles(i))