Hi, i extracted a portion of my code as below. Its actually a combine file code. It works, but when i paste the folder path in A1, and run the marco, the code will onli open the Excel File inside the Folder, but not open the Sub Folder Excel file inside the Folder.
I believe its somewhere below that need some amendment. Anyone can help?
[code]
path = Sheets("Sheet1").Range("A1").Value
FileName = Dir(path & "*.xls*")
Do While FileName <> ""
Set wb = Workbooks.Open(FileName:=path & FileName, ReadOnly:=True)
[code/]
Bookmarks