can't import special characters

I wrote a program that imports selected data from one or several csv file(s). The program opens the first csv file and then according to some characteristics copies selected data to a newly created workbook. Subsequently the remaing csv files are opened and desired data is copied to the new workbook.

This program does its job well except that special characters are converted to japanese characters. The same problem occurs if I just open the csv file in Excel. However, if I instead of opening the csv file import it using "Data-from text" and specify File origin as Unicode UTF-8 then the special characters are not converted to japanese characters.

What I would like to do now is to modify the below loop so that the special characters are preserved. I don't know if this can be done by just modifying the below loop which is based on opening the csv file(s) or whether the loop needs to be completely rewritten and based on importing the csv data in UTF-8.

Yet another solution would be to change the default file opening format. On US or European Excel installations csv file special characters are not converted to japanese characters. I looked but cannot find any setting that would do the trick.

I need some help either reprogramming the below sub routine or changing the Excel setting.

Please Login or Register  to view this content.

no, I have not tried Workbooks.OpenText but I understand what you are saying. Please give me a short example script so that I get an idea about what I need to change.

I assume I need to change the following line:

Please Login or Register  to view this content.

However, I am not sure how exactly the Workbooks.OpenText script has to be written.

I reduced my script to the following:

Please Login or Register  to view this content.

I compared the import using the above script with the Data-FromText import method.
Script: PKCζ-interacting
Data-FromText PKCζ-interacting

Data-FromText is correct. Script still gives the wrong result.

Yes, I know about the Excel problems with csv files and UTF8. There seems to be no easy solution.
I have never used querytables.

If I use the macro recorder and do a Data-FromText import then I get a QueryTable script. I am trying to fit this script into my macro. As always the problem lies in the detail. Do you know how I have to adjust the Connection in the first line of the querytable script and .Name

Please Login or Register  to view this content.

this is working. Thank you very much. I consider the problem solved.

Yes, you are right. I am aware of this issue. I am working on it. I should be OK.

thanks for the hint. I will keep it in mind. I'll have to see whether it is better to build in your script into mine or whether it is just better to slidly modify what I got.