Swapping Multiple Columns of Data

**Admin** · 09-28-2012, 08:31 AM

Hi jomili,

Welcome to ExcelFox !!

Please do not ask questions on Rick's blog. Ask question on Excel help forum and refer the thread if you face any problems on Rick's code.

This time I added the reference and moved your post to Excel forum. I appreciate if you follow this rule in your future posts.

**jomili** · 09-28-2012, 05:37 PM

Thanks, I didn't know any better, so I'll try to remember that in the future.

**jomili** · 09-28-2012, 06:31 PM

Update: I've got a workaround. If create column "AF", "Trash Column", and add AF as the last item in my string of columns (see below), it gets left as the last column, whereupon I can delete it and get what I need. This will work, but I'd be interested in seeing it work without the workaround.

Code:

Const NewOrder As String = "D,E,AC,AD,AE,AB,B,C,F,G,H,I,J,K,L,M,N,P,X,Y,Q,R,S,T,U,V,W,A,AA,O,Z,AF"

**Rick Rothstein** · 09-29-2012, 09:24 PM

Originally Posted by jomili

Update: I've got a workaround. If create column "AF", "Trash Column", and add AF as the last item in my string of columns (see below), it gets left as the last column, whereupon I can delete it and get what I need. This will work, but I'd be interested in seeing it work without the workaround.

Code:

Const NewOrder As String = "D,E,AC,AD,AE,AB,B,C,F,G,H,I,J,K,L,M,N,P,X,Y,Q,R,S,T,U,V,W,A,AA,O,Z,AF"

I have confirmed the bug you uncovered in my original code and have corrected it. The code appearing in Message #1 of the my "Swapping (Rearranging) Multiple Columns of Data" article is now correct as shown. Thank you for uncovering the problem!