Перенос данных по листам с условиями.

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

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

Перенос данных по листам с условиями. (Формулы)

VSpolun

Дата: Среда, 30.10.2013, 17:41 | Сообщение № 1

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

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

Сообщений: 19

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

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

Excel 2013

День добрый! передо мной стоит такая задача. В листе "Объект сейф" нужно отсортировать данные по столбцу "Этап". Допустим отфильтровали по 1-му этапу(это понятно как делать не в этом суть). Эти данные нужно вставить в лист "Объект", но под строчку в первом столбце которой стоит соответственно тоже цифра "1". без потери данных ниже... т.е. как-то нужно автоматически определить количество отсортированных строк с данными в листе "Объект сейф", добавить их ПОД нужную цифру и уже туда вставить эти данные... вот только как....я понятия не имею.. помогите пжлста.

К сообщению приложен файл: _Microsoft_Exce.xlsm (10.8 Kb)

Ответить

AlexM

Дата: Среда, 30.10.2013, 17:57 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4517

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

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

Excel 2003

Таблицы на листах совершено разные. Непонятно как вставлять одну в другую.

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Ответить

VSpolun

Дата: Среда, 30.10.2013, 18:00 | Сообщение № 3

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

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

Сообщений: 19

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

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

Excel 2013

AlexM, Да как вставить я разберусь уже сам(это не основная задача). Нужно самое главное после сортировки определить кол-во строк с данными и вставить пустые строки под соответствующие цифры.... а вставлять не обязательно это я уже сам потом дописать смогу.

Сообщение отредактировал VSpolun - Среда, 30.10.2013, 18:01

Ответить

AlexM

Дата: Среда, 30.10.2013, 18:05 | Сообщение № 4

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4517

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

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

Excel 2003

Ну если так, то...
В цикле перебираете значения в столбце "Этап" и считаете единицы. Получаете сколько строк добавить.
Вставляете нужное количество строк.
[vba]

Код

Rows(n).Resize(m).Insert Shift:=xlDown

[/vba]
где n - срока под единицей на листе "Объект", m-количество вставляемых строк
А дальше вы знаете.

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Сообщение отредактировал AlexM - Среда, 30.10.2013, 18:15

Ответить

Перенос данных по листам с условиями. (Формулы)

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