Auto sort with macro

**magman1984** · 04-03-2012, 02:47 PM

Hi

I wonder how I can auto sort column O and P from smallest to largest using macro. Worth to mention is that there is formulas in P1, P2, P3 etc..

There is really no need for opening attachment.

My columns are basicly like this.

Column O            Column P

James                10
Gina                  5
Patrick               7
David                 2

I want to sort both columns based on P from smallest to largest

Attachment 148600

**magman1984** · 04-03-2012, 03:30 PM

Fixed it by recording a macro

Sub Macro2()
'
' Macro2 Macro
'

'
    Range("M5:N21").Select
    Range("N5").Activate
    ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("N5"), _
        SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Sheet1").Sort
        .SetRange Range("M5:N21")
        .Header = xlNo
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
End Sub

Auto sort with macro

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

Auto sort with macro

Re: Auto sort with macro

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions