Try recording a macro when you sort your range.
There's an option button on the sort dialog that allows you to specify right to
left.
I got this (in xl2002):
Range("C4:AN4").Select
Selection.Sort Key1:=Range("C4"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
DataOption1:=xlSortNormal
I'd modify it to something like:
Option Explicit
Sub testme01()
Dim myRng As Range
Set myRng = Worksheets("sheet1").Range("c4:AN4")
With myRng
.Sort Key1:=.Cells(1), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight
End With
End Sub
(you really meant sort by column???)
Todd Huttenstine wrote:
Ive got a worksheet with a table. On row 4 I have
different categorys. What is the code I would use for it
to look in Row 4 starting with column C and sort
alphabetical? My data goes from column C to Column AN in
row 4. I would like to have the code inserted into a
button so I can just click and it sort.
Thank you
Todd Huttenstine
--
Dave Peterson