Macro/VBA to copy a range of data from a worksheet to a new workbook

[oosag23]

Please,can someone help me write a macro.
I have an“A.xls” workbook where I want to open then copy a range of data to “B.xlsx” file.

B.xlsxfile has the same format as a.xls so the data being copied will fit the samerange.

I then want to password protect the new workbook (B.xlsx) and rename andsave it as A.xlsx (same title as “A.xls” file). I need this to repeat for 400files that need this change.

Is it possible to dynamically make this macro to fit for the next files eg. (A-1.xls to B-1.xlsx renamed to A-1.xlsx)

Anyassistance would be much appreciated.

 

[oosag23]

I receive a "400" error after about half of the files have already ran through the macro.

 

[DanteAmor]

Check the file that has the problem. You must remove it from your folder.
Or add this instruction to the start of the macro: On error resume next