I dont know why the above code was re-written I did not see any change. It is the same exact code in Excludes_20a and I also did a test just to list a parent folder and all it's files without any excludes, I am still getting run-time error 5: invalid procedure call or argument on

i = Application.WorksheetFunction.Match(UCase(p.Name), aryFoldersToExclude, 0)