Friday, December 23, 2011

Multiple level sort using VBA

If you want to sort data on multiple levels in a range .Snapshot below-



Here is the code-



Sub MULTI_LEVEL_SORT()
'1ST level SORT ON NAME COL A
'2ND level SORT ON START DATE COL B
'3RD levle SORT ON END DATE COL C
Sheets("Sample").Range("a1:d" & Sheets("Sample").Range("a1").End(xlDown).Row).Sort _
key1:=Sheets("Sample").Range("A:A"), order1:=xlAscending, _
key2:=Sheets("Sample").Range("B:B"), order2:=xlAscending, _
key3:=Sheets("Sample").Range("C:C"), order3:=xlAscending, _
Header:=xlYes
End Sub


Download Workbook
at
Labels:

5 comments:

  1. UnknownApril 21, 2015 at 2:58 AM

    If you are interested in learning Multiple Level Sorting Using VBA

    http://www.exceltip.com/tips/multiple-level-sorting-using-vbain-microsoft-excel-2010.html

    ReplyDelete
  2. UnknownMarch 21, 2016 at 7:40 AM

    This macro is perfect. Thank you very much. I used it in a macro from Cols A to W and for a sheet called "Misc". It works perfectly.

    ReplyDelete
    Replies
    1. UnknownJanuary 3, 2017 at 8:27 AM

      Hi,
      Would you please share your code of multi-level sorting as for me till 3rd level it is working fine but from 4th its started failing.

      Thanks in advance.

      Delete
    2. Excel VBA CodebaseJanuary 3, 2017 at 10:24 AM

      excel version you are using ?

      Delete
  3. ramizJuly 13, 2016 at 5:36 AM

    Its a great pleasure reading your post.Its full of information I am looking for and I love to post a comment that "The content of your post is awesome" Great work.
    excel vba courses london

    ReplyDelete

Subscribe to: Post Comments (Atom)

Import data from SQL

Macro to import data from SQL using ADO connection string: Sub Import_data_from_SQL() ' Tools -> References -> Microsoft Active...