Группировка значений для анализа

[xamillion]

Здравствуйте! Снова буду приставать с задачками… … на мой взгляд очень даже интересными…
На этот раз необходимо из списка значений разнести по соответствующим полям. Есть список предприятий с их показателями деятельности по месяцам в столбец, причем предприятие повторяется ровно столько раз, сколько месяцев указано. Необходимо свернуть предприятие в строку, чтобы показатели по месяцам были в одной строке, причем предприятия в разных месяцах могут отличаться… Наверное макросом будет наиболее оптимально… Пример прилагается…

[EducatedFool]

Наверное макросом будет наиболее оптимально…

Как знать... может и нет...

Макросом, конечно, можно сделать всё, что угодно, но, возможно, найдётся способ проще...

Послушаем сначала, что скажет по этому поводу IgorGO - вдруг задача легко решается при помощи каких-нибудь там сводных таблиц или формул...

Если же окажется, что проще макросами - сделаю при помощи их.

(добавлено)
Совет на будущее: не помешало бы указать ссылку на предыдущие Ваши темы с аналогичными задачами
Или в крайнем случае даже задать вопрос в той же теме...

А то в прошлых темах уже были написаны кое-какие макросы, имеющие отношение к данному файлу.
И если снова начинать писать макросы, то было бы неплохо взять за основу хоть часть старого кода.
А искать Ваши прежние темы - это долго

[IgorGO]

Спасибо за доверие, EducatedFool, угадал - сводная таблица.
xamillion, увы, задача абсолютно типовая для эксель, чисто механичестие действия заняли 15-20 секунд.

[xamillion]

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

[SAS888]

Так как

это будет одним из этапов автоматического пересчета

то в предлагаемом варианте сделано все, может быть не изящно, но специально поэтапно (т.к. по-видимому, понадобятся какие-нибудь не оговоренные доработки и изменения). Посмотрите вложение. Запустите макрос "Main". Результирующая таблица формируется точно в том виде, который указан автором темы.

[PaulD]

Необходимо сделать небольшую програмку на базе Excel для финансового учета, с выводом потом сводных таблиц, диаграм и т.д.
Хорошо заплачу. звоните 8 067 209 36 89 Павел ( г.Киев)

[xamillion]

Сообщение от SAS888

Так как то в предлагаемом варианте сделано все, может быть не изящно, но специально поэтапно (т.к. по-видимому, понадобятся какие-нибудь не оговоренные доработки и изменения). Посмотрите вложение. Запустите макрос "Main". Результирующая таблица формируется точно в том виде, который указан автором темы.

Обалдеть - именно то что нужно!!!

Спасибо IgorGO - напомнил про существование сводных таблиц (очень полезная штука, про которую я совсем забыл), спасибо EducatedFool - стараюсь все-таки использовать прошлые наработки (очень даже пользуюсь Вашими макросами), спасибо SAS888 - все прямо в точку... Уже не раз выручали...
По Вам, ребята, пособие можно писать по офису и ВБА... Где Вы этому научились? Может книга в электронном виде есть хорошая?

[viter.alex]

Сообщение от xamillion

…

Снимаю шляпу.

[xamillion]

Не хотел Вас беспокоить и воспользовался поиском... но по причине того, что ничего подходящего не нашел все же пришлось написать... И снова нужен макрос...

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

И как всегда аттачмент...

[SAS888]

Посмотрите вложение. Там два макроса. Для извлечения данных из файлов запустите макрос "GetFromFiles". Файл "результат.xls" должен находиться в той же папке, что и просматриваемые файлы. Если есть необходимость разместить его в другой папке, то в коде вместо "CurDir" пропишите путь к папке с файлами.
Для обработки полученных данных, запустите макрос "Processing". Здесь добавлена функция вставки листа "результат". Причем, если такой лист уже существует - ошибки не будет.

P.S. А если бы в файлах-источниках листы, с которых требуется получить данные, имели бы одинаковое имя (например, "Лист1"), то можно было бы получить данные из требуемых файлов без открытия и закрытия книг, что более рационально.