When creating XL_List, consider replacing Where UpCase(Substr(Text,Index(Text,'.')+1,4)) in ("XLSX" "XLS"); with Test=Reverse(Trim(LowCase(Text))); If "xslx." =: Test or "slx." =: Test; Though it may not be so elegant, this code will include files with more complex names, such as blah.blah.xls, whereas the original will ignore such files.
... View more