Сортировка данных с переносом с одной страницы на другую

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сортировка данных с переносом с одной страницы на другую (Макросы Sub)

Aexbro

Дата: Среда, 05.03.2014, 13:32 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 37

Репутация: 4 ±

Замечаний: 0% ±

Excel 2007

Здравствуйте
Пытаюсь сам, но пока не получается. Не хватает знаний. Есть книга учета рабочих часов и overtime. Возможно ли их соединить таким образом что бы данные с таблицы на первой странице попадали в таблицу на второй странице, отсортированные по overtime( колонка G)от большего к меньшему.В первый лист данные попадают в произвольном порядке( copy-paste с другой книги), а во втором они отображаются в убывающем (по последней колонке).
Спасибо

К сообщению приложен файл: 0037795.xls (81.0 Kb)

Ответить

wild_pig

Дата: Четверг, 06.03.2014, 20:41 | Сообщение № 2

Группа: Проверенные

Ранг: Обитатель

Сообщений: 517

Репутация: 97 ±

Замечаний: 0% ±

2003, 2013

А как сейчас сортируется второй лист?

Ответить

nilem

Дата: Четверг, 06.03.2014, 21:01 | Сообщение № 3

Группа: Авторы

Ранг: Старожил

Сообщений: 1613

Репутация: 563 ±

Замечаний: 0% ±

Excel 2013, 2016

Может, сразу на 1-м листе сортировать? Например,
[vba]

Код

Sub ertert()
Dim r As Range
For Each r In Range("G6", Cells(Rows.Count, "G").End(xlUp)).SpecialCells(xlCellTypeFormulas).Areas
     With r.Offset(, -5).Resize(, 6)
         .Sort Key1:=.Cells(1, 6), Order1:=xlDescending
     End With
Next r
End Sub

[/vba]

Яндекс.Деньги 4100159601573

Ответить

Aexbro

Дата: Четверг, 06.03.2014, 21:34 | Сообщение № 4

Группа: Пользователи

Ранг: Новичок

Сообщений: 37

Репутация: 4 ±

Замечаний: 0% ±

Excel 2007

Спасибо огромное

Ответить

Страница 1 из 1
1