Thread: Sort Columns
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
T De Villiers[_60_] T De Villiers[_60_] is offline
external usenet poster
 
Posts: 1
Default Sort Columns


Hi,

I have 6 columns and 5000 rows.
My headings a
a,b,c,d,e,f

I need to write a macro which sorts the cols in order:
a,c,d,b,e,f

It does need to be a macro, as opposed to manually doing a custom
list.
I have tried writing a macro which involves custom lists (below)
but doesnt quite work.

Thanks


Sub sortcol()

Range("A1:G12936").Sort Key1:=Range("A1"), Order1:=xlAscending,
Header:= _
xlGuess, OrderCustom:=6, MatchCase:=False,
Orientation:=xlLeftToRight, _
DataOption1:=xlSortNormal
End Sub


--
T De Villiers
------------------------------------------------------------------------
T De Villiers's Profile: http://www.excelforum.com/member.php...o&userid=26479
View this thread: http://www.excelforum.com/showthread...hreadid=565980