VBA сортировать по самой старой дате - PullRequest
0 голосов
/ 02 июля 2018

Эта проблема сводит меня с ума. В основном мне нужно отсортировать диапазон от самой старой даты до самой новой даты. Когда я реализую этот код на одном листе, он работает, когда я запускаю на другом листе, это не так, несмотря на то, что оба листа в основном одинаковы (разные числа, но одинаковое количество заполненных столбцов и строк)

Я хочу, чтобы по дате сортировался только общий диапазон, а не весь лист. В то время как в листе 1 это работает, в листе 2 это не так, и сортирует весь лист на основе самой старой даты. Почему это так?

lr = ActiveSheet.Cells(Rows.Count, 10).End(xlUp).Row

Set totrng = ActiveSheet.Cells(ActiveSheet.Rows.Count, "J").End(xlUp).CurrentRegion
totrng.Sort Key1:=Range("J4:J" & lr), order1:=xlAscending, Header:=xlNo

Заранее благодарю за помощь

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...