Microsoft Office Forums - View Single Post - [Solved] Linking cells: can sub-cells move with their master-cell when sorting?

charlesdh · 06-30-2015, 05:02 PM

HI,

You can do a "Custom" sort.
Here is a Recorded macro based on you sample

Code:

Sub Macro1()
'
' Macro1 Macro

    
    ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("A3:A16") _
        , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Sheet1").Sort
        .SetRange Range("A3:B16")
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
End Sub