I have a spreadsheet that was created in Excel 2016, but users may have versions back to 2010.

I have some simple Sort VBA that works fine in 2016, but gives an error code in 2010. (see screen shot of error).

SortError.png

How can I adjust my code to make it work for the earlier version of Excel?

Here's the code:
Sub SortCakeBoxes()
'
' SortCakeBoxes Macro
' Sorts Cake Boxes section of Main Materials sheet.
'

'
     Range("CakeBoxesTable").Select
    ActiveWorkbook.Worksheets("Main Materials Lists").ListObjects("CakeBoxesTable") _
        .Sort.SortFields.Clear
    
    ActiveWorkbook.Worksheets("Main Materials Lists").ListObjects("CakeBoxesTable") _
        .Sort.SortFields.Add2 Key:=Range("CakeBoxesTable[Box Description]"), SortOn _
        :=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    
    With ActiveWorkbook.Worksheets("Main Materials Lists").ListObjects( _
        "CakeBoxesTable").Sort
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    Range("C12").Select
   
    
End Sub