Sorting Macro with Correct Orientation

[Mike Truth]

I have a macro that takes this information from another sheet and pastes it in another and then sorts it in decending order by number, however, I want to make it go in ascending order. Everytimg I change the decending into an ascending in the code for Order it puts the numbers in ascending order like I want but all the way down the bottom of the page in like the 350th cell, how can I get it to be back in cell 1?
Here is what I have:

        Range("M2:N351").Select
    Selection.Copy
    Sheets("Results").Select
    Range("N1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("N1:O351").Select
    Application.CutCopyMode = False
    Selection.Sort Key1:=Range("N1"), Order1:=xlDescending, Header:=xlGuess _
        , OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    ActiveWindow.SmallScroll Down:=-144
    Range("A1").Select

 

[Leith Ross]

Hello MikeTruth,

You can find the answer to question by clicking the link below...
http://www.excelforum.com/excel-programming/835339-sorting-macro-orientation.html

 

[Mike Truth]

Didn't work, but thanks...