Corrupt file. Fail to open using the workbooks.open method

Hi everyone,

I have a macro that open and close subsequently files. Sometimes these files are corrupted causing the method workbooks.open "NameOfMyFile.xlsx" to fail. (Run time error 1004, Method 'open' of object 'workbooks' failed)

I have to open the file manually, it then says that "excel has found some unreadable content" and offer to correct the file. Once done and saved, I go back to my code and the file opens without any issue.

My question: is there a method to force a corrupt file to open, correct it and save it, so that it can be opened by using the workbooks.open method?

Thankfully

Phil

Mortphi,

It will be easy that copy data from corrupted file and paste it new file. Delete the corrupted file and rename new one.

Regards,
Nandkumar S.

Thanks NandKumar S.

I found a way to force a corrupt file to open. When using the workbooks.open method, there is an argument I did not know about called "corrupt load". So if one write worbooks.open Filename:= "TheNameofMyFile", CorruptLoad:= xlrepair , then the file opens. So I just made a loop opening all these files the one after the other and if they were corrupted I would save them using active workbooks.saveas and close it active workbook.close

Phil