перенос строк в соседние столбцы

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

Пользователь

Сообщений: 12 Регистрация: 01.01.1970

17.07.2013 22:48:20

Всем привет!
Возможно такое в excel не сделать, но надежда умирает последней.

Если кто знает, подскажите как некоторые строки перенести в соседние столбцы, сместить (параллельно данным в соседнем солбце и заполнить, а также удалить оставшиеся пустые строки?

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

Прикрепленные файлы

Книга1.xlsx (10.35 КБ)

KuklP

Пользователь

Сообщений: 14868 Регистрация: 21.12.2012

E-mail и реквизиты в профиле.

17.07.2013 23:09:29

Код

Public Sub www()
    Dim a As Range
    For Each a In Range("f3:f" & [e65536].End(xlUp).Row).SpecialCells(4).Areas
        a.Offset(, -3).Value = a.Cells(1).Offset(-1)
        a.Offset(, -4).Value = a.Cells(1).Offset(-1, -1)
    Next
    Range("f3:f" & [e65536].End(xlUp).Row).SpecialCells(2).EntireRow.Delete
End Sub

Прикрепленные файлы

Книга1 (1).xlsm (15.93 КБ)

Я сам - дурнее всякого примера! ...

Юрий М Модератор Сообщений: 61089 Регистрация: 14.09.2012 Контакты см. в профиле	#3 17.07.2013 23:30:24 Серж, ты понял задачу? Я так и не смог)))

KuklP

Пользователь

Сообщений: 14868 Регистрация: 21.12.2012

E-mail и реквизиты в профиле.

17.07.2013 23:34:02

Вроде понял

Автору судить.
Да не, надо нормализовать таблицу.

Цитата
Димоныч Димон пишет: надо сделать так, чтобы можно было из нее сделать фильтры для отбора и поиска значений

Я сам - дурнее всякого примера! ...

Rustem Пользователь Сообщений: 520 Регистрация: 16.01.2013	#5 18.07.2013 00:11:22 Может так подойдет? Прикрепленные файлы Книга2.xlsx (11.17 КБ) Изменено: Rustem - 18.07.2013 00:19:32 Excel 2013

Димоныч Димон

Пользователь

Сообщений: 12 Регистрация: 01.01.1970

19.07.2013 03:09:24

Сергей (KuklP),
разобрался, все сработало, большое человеческое спасибо!!! спасен!! ) :idea:

... правда строк 30-40 перекосячило, заметил их через полсуток,
восстанавливать поздно, разбираться некогда было... вырезал их и успел таки все сделать )

заодно вот разобрался в пользовательских функциях... ура! )

KuklP Пользователь Сообщений: 14868 Регистрация: 21.12.2012 E-mail и реквизиты в профиле.	#7 19.07.2013 06:32:42 А че ж только мне-то? Ребята тоже старались. Rustem вон среди ночи решение делал... Я сам - дурнее всякого примера! ...

Димоныч Димон Пользователь Сообщений: 12 Регистрация: 01.01.1970	#8 19.07.2013 11:49:14 Вот человек, сразу понял мои панические метания в виде непонятных пространных объяснений, тут же выдал 99,9% правильное решение… и давай себя лакировать - украшать скромностью Конечно всем спасибо за внимание и уделенное время. Rustem(у) тоже.

Читают тему