Swap columns

[Costasg]

Hello,

My data is comprised of 4 columns A B C D. What I want to do is to have A C B D (there are no labels on the top) My code works for the active sheet (recorded macro) but can't make it work for all the sheets of the workbook. This is what I have so far:

Please Login or Register  to view this content.

Could anyone help me how to do this work?

Thanks in advance

[Andy Pope]

Please Login or Register  to view this content.

Use of the select without activating the sheet will cause problems. Neither are required though.

[Costasg]

Any suggestions?

[Costasg]

Many thanks Andy Pope