Ordenar números en filas en forma ascendente

En la primera fila tienes esto:

Miércoles, 24/07/13,Noche, 236,1,47,32,12,25,17,14

¿Solamente estos números se tienen que ordenar?

47,32,12,25,17

Y Quieres que quede así

Miércoles, 24/07/13,Noche, 236,1,12,17,47,25,32,14

Para lograr lo que necesitas se tiene que hacer con una macro, ¿si quieres te la haga?.

DAM gracias por tu pronta respuesta y asi es, entendiste perfectamente lo que quiero a pesar de no haber puesto que salida necesito, serias de gran ayuda si me apoyas con la macro.

Saludos y de nuevo y muchas gracias.

Sigue las Instrucciones para un botón y ejecutar la macro
1. Abre tu libro de Excel
2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
3. En el menú elige Insertar / Módulo
4. En el panel del lado derecho copia la macro
5. Ahora para crear un botón, puedes hacer lo siguiente:
6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
8. Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona Asignar macro / Selecciona: ordenarnums
9. Aceptar.
10. Para ejecutarla dale click a la imagen.

Sub ordenarnums()
'Por.DAM
Application.ScreenUpdating = False
For i = 1 To Range("A" & Rows.Count).End(xlUp).Row
    Range("F" & i & ":J" & i).Copy
    Range("M1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=True
    ActiveWorkbook.Worksheets("Hoja1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Hoja1").Sort.SortFields.Add _
        Key:=Range("M1"), SortOn:=xlSortOnValues, _
        Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Hoja1").Sort
        .SetRange Range("M1:M5")
        .Header = xlNo
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    Selection.Copy
    Range("F" & i).Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=True
Next
Range("M1:M6").ClearContents
Application.ScreenUpdating = True
MsgBox "Finalizado ordenar números", vbInformation
End Sub

Saludos.DAM
Si es lo que necesitas.

Dam, seguí tus instrucciones para insertar la macro y ejecutarla y la primera fila la ordena correctamente pero a partir de la segunda fila, invierte los números de la segunda columna con los números de la segunda, como muestro abajo.

miércoles,24/07/2013,Noche,236,1,12,17,25,32,47,14
martes,23/07/2013,Noche,235,28,6,18,38,39,46,32
lunes,22/07/2013,Noche,234,11,2,14,16,33,45,37

lo que sigue es como originalmente se encuentra el archivo antes de ser ordenado

miércoles,24/07/2013,Noche,236,1,47,32,12,25,17,14
martes,23/07/2013,Noche,235,28,39,18,46,6,38,32
lunes,22/07/2013,Noche,234,11,16,33,2,45,14,37

otra pregunta, ¿como puedo subir la hoja para que la pruebes?.

Saludos y gracias por tu apoyo.

Perdona, estaba tomando de la 6 a la 10, pero ya la corregí para que tome de la 5 a la 10. Cambia la macro por esta:

Sub ordenarnums()
'Por.DAM
Application.ScreenUpdating = False
For i = 1 To Range("A" & Rows.Count).End(xlUp).Row
    Range("E" & i & ":J" & i).Copy
    Range("M1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=True
    ActiveWorkbook.Worksheets("Hoja1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Hoja1").Sort.SortFields.Add _
        Key:=Range("M1"), SortOn:=xlSortOnValues, _
        Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Hoja1").Sort
        .SetRange Range("M1:M6")
        .Header = xlNo
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    Selection.Copy
    Range("E" & i).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=True
Next
Range("M1:M6").ClearContents
Application.ScreenUpdating = True
MsgBox "Finalizado ordenar números", vbInformation
End Sub

Prueba y me comentas
Saludos. DAM
Si es lo que necesitas.