Automatic save Excel file in latest format

[theresatan]

Hi:

I need to extract the data from Excel files (about 1000) that are incompatible with my Excel 2003/2000.

When I open them with Excel 2000/2003, I got a prompt as follow:

xxx.xls may contain features that are not compatible with Text (Tab delimited). Do you want to keep the workbook in this format?

.To keep this format, which leaves out any incompatible features, click Yes.
.To preserve the features, click No. Then save a copy in the latest Excel format.
.To see what might be lost, click Help.

When I click NO and save a copy in the latest Excel format, then I can use openQuery to extra the data.

Is there a way to automatic save those Excel files in latest format?

Thanks in advance

Theresa

 

[royalcheese]

Hi

Maybe something like

    ActiveWorkbook.SaveAs Filename:="C:\Book1.xls", FileFormat:=xlExcel9795

Look at the xlFileformat in the help, for more options

Hopes this helps

Chris