Rearrange columns - loop perhaps?

[tone640]

The following macro takes information from one sheet and puts it on another (basically swaps the order of the columns):

Please Login or Register  to view this content.

It works perfectly, but only if Sheet2 is active - why is this?

Secondly, I am doing the same operation for around 20 columns - could I turn this into a loop?

Thanks for reading.

[romperstomper]

Please Login or Register  to view this content.

The underlined part is an unqualified range reference. For code in a normal module, that will always refer to the active sheet, hence Sheet2 needs to be active. It should be:

Please Login or Register  to view this content.

It would be simpler, IMO, to use a row above your data, input numbers for the order you want the columns in, then just sort the data left to right instead.

[tone640]

I didn't even know you could sort left to right!

As always your expert assistance is much appreciated.