Formula to sort 6 row values into ascending order

[D_Spark]

I have a workbook with 120 rows

Each row has 6 columns, so 6 numeric values per row

I want to add a formula into cells (G1:L1) to sort the first row values into ascending order and then drag the formula down, rather than sorting each row manually.


Im unsure I need to highlight cells G1:L1 and then enter an array formula in the formula bar?

 

[Son]

If you want to sort by row, you can use the following code and sort the existing data.

Sub SortByRow()


Dim x
For x = 1 To 120


    Range("A" & x & ":F" & x).Select
    Selection.Sort Key1:=Range("A" & x), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
        DataOption1:=xlSortNormal
Next x


    Range("a1").Select
End Sub

If you want, you could copy first the data to range G:L and then use this area for sorting.

 

[thisoldman]

The array formula method.

Select G1:L1 and Ctrl+Shift+Enter the array formula,

=SMALL(A1:F1, COLUMN(A:F))

All six cells should be populated and curly brackets (braces?) should appear at the beginning and end of the formula. Then copy this line of six cells and paste downward.