How do I fix this error: Object doesn’t support this property or method (Error 438)
Here’s the code:
Range(“F5:H16”).Select
Selection.ClearContents
ActiveWorkbook.Worksheets(“Racer”).AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets(“Racer”).AutoFilter.Sort.SortFields.Add2 Key:=Range _
(“E4:E16”), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets(“Racer”).AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Range(“C5:C16”).Select
Selection.ClearContents
Range(“M13”).Select
ActiveCell.FormulaR1C1 = “”
Range(“O13”).Select
ActiveCell.FormulaR1C1 = “”
Range(“Q13”).Select
ActiveCell.FormulaR1C1 = “”
Range(“F5”).Select
Here’s the code: Range(“F5:H16”).SelectSelection.ClearContentsActiveWorkbook.Worksheets(“Racer”).AutoFilter.Sort.SortFields.ClearActiveWorkbook.Worksheets(“Racer”).AutoFilter.Sort.SortFields.Add2 Key:=Range _(“E4:E16”), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _xlSortNormalWith ActiveWorkbook.Worksheets(“Racer”).AutoFilter.Sort.Header = xlYes.MatchCase = False.Orientation = xlTopToBottom.SortMethod = xlPinYin.ApplyEnd WithRange(“C5:C16”).SelectSelection.ClearContentsRange(“M13”).SelectActiveCell.FormulaR1C1 = “”Range(“O13”).SelectActiveCell.FormulaR1C1 = “”Range(“Q13”).SelectActiveCell.FormulaR1C1 = “”Range(“F5”).Select Read More