It is immaterial but I don't know what steps you did to get that code. The usual method is to use a Sheet's Queries method.
Since you did not paste code between code tags, it is hard to see structure. Click # on toolbar to insert tags.
Change File.Contents(.\x.csv) to:
Code:
File.Contents(ActiveWorkbook.Path & "\x.csv")
You may have to duplicate the double quotes when embedded between a quoted string.