Как я могу преодолеть ошибку времени выполнения «1004» при попытке сортировать мои данные?

Question

Я фильтрую большой набор данных.В рамках этого процесса я пытаюсь отсортировать диапазон ячеек либо по возрастанию, либо по убыванию, учитывая определенное условие.

Я исследовал несколько вариантов, касающихся сортировки.Я изо всех сил пытаюсь понять параметры.

If Abs(Worksheets("Points").Cells(i, 4).Value - Worksheets("Points").Cells(i - 1, 5).Value) > _
Abs(Worksheets("Points").Cells(j + 1, 4).Value - Worksheets("Points").Cells(i, 5).Value) Then
    'Test to see whether logically the User moved from
    'the previous Sensors to the time stamp Sensors (Decending) or
    'from the time stamp Sensors to the next Sensor (Acending).
    'This If is used to determine whether sorting must happen
    'in an Acending or Decending order
    'Time MUST be in date format!!!!!

    Worksheets("Trips").Range(Cells(1, 23), Cells(k, 27)).Sort _
    Key1:=Worksheets("Trips").Range(Cells(1, 27)), Order1:=xlDescending, Header:=xlNo
Else
    Worksheets("Trips").Range(Cells(1, 23), Cells(k, 27)).Sort _
    Key1:=Worksheets("Trips").Range(Cells(1, 27)), Order1:=xlAscending, Header:=xlNo
End If

Answer 1

Изменить Key1:=Worksheets("Trips").Range(Cells(1, 27)) на Key1:=Worksheets("Trips").Columns(27)

Вы предлагали отсортировать по одной ячейке, первой строке в столбце 27.