Yes, it is but I changed the Case Form to .txt so it could be opened easily. The point is, though my following line If Extension = 'txt' is meant to exclude anything that no longer has an extension of text. I have debugged the code and no file other than extension of.txt get through to the Call VBComponent line, so how is it still producing files with extension of .frx ? Or am I missing something obvious here?