When copying the Date from CSV to Excel the format changes to text.

[sak1985]

Dear All,

I use the below code to copy the data from .csv file to .xls file, but the format of the dates copied in .xls was in text format which gives me Type Mismatch error while subtracting two dates. Suggest what has to be done.

 Set t201 = xlws2.Range("A1:AZ" & sins1)
        Set t202 = Sheet6.Range("A1:AZ" & sins1).End(xlUp)
        t201.Copy t202

Regards,
Sak

 

[jjlwork]

Try using the CDate() function.