Excel VBA - назначить порядок сортировки переменной

У меня есть код, который отлично работает:

    ActiveWorkbook.Worksheets("compleanni").Sort.SortFields.Add2 Key:=Range( _
                                                                       "I6:I23"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortTextAsNumbers

Я бы хотел изменить это так:

myorder="xlAscending"
....
....
Order:=myorder

но это не работает: я получаю ошибку во время выполнения 13. Есть предложения?

# excel
Источник
  • 0
    Избавьтесь от кавычек в задании, и оно должно сработать.
  • 0
    попробуйте myorder = xlAscending
Codelisting
за 1 против
Лучший ответ

xlAscendingпредопределенная константа в VBA (Excel), ее типlong (значение равно 1, но это не важно).

Уменьшите яркость вашей переменнойmyorder в качествеLong и присвоив константу:

Dim myorder as Long
myorder = xlAscending ' (or xlDescending)
  • 0
    Спасибо, отлично работает!
Codelisting
Популярные категории
На заметку программисту