Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Разложение одной таблицы на несколько (по горизонтали) - Мир MS Excel

  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: китин, _Boroda_, DrMini  
Разложение одной таблицы на несколько (по горизонтали)
Dalm Дата: Воскресенье, 28.06.2026, 08:39 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
Здравствуйте.
У меня есть таблица, в которой находится список. Но список идет не единым, а разделенным на группы (то есть в нем есть разделители).
Разделитель начинается со слова "Группа". Если есть в таблице строка которая начинается с такого слова - то это и есть разделитель.
Части этих таблиц нужно ставить под теми ячейками где записано слово Группа (подсветил их синим цветом).

Подскажите как макросом разложить одну таблицу, где перечисление групп идет по вертикали - на несколько таблиц по горизонтали (с разбивкой по группам) ?
Стрелками показал как примерно расположатся в итоге, по горизонтали - части основной таблицы.
К сообщению приложен файл: dalm.xlsm (24.1 Kb)
 
Ответить
СообщениеЗдравствуйте.
У меня есть таблица, в которой находится список. Но список идет не единым, а разделенным на группы (то есть в нем есть разделители).
Разделитель начинается со слова "Группа". Если есть в таблице строка которая начинается с такого слова - то это и есть разделитель.
Части этих таблиц нужно ставить под теми ячейками где записано слово Группа (подсветил их синим цветом).

Подскажите как макросом разложить одну таблицу, где перечисление групп идет по вертикали - на несколько таблиц по горизонтали (с разбивкой по группам) ?
Стрелками показал как примерно расположатся в итоге, по горизонтали - части основной таблицы.

Автор - Dalm
Дата добавления - 28.06.2026 в 08:39
Pelena Дата: Воскресенье, 28.06.2026, 08:48 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19635
Репутация: 4705 ±
Замечаний: ±

Excel 365 & Mac Excel
Здравствуйте.
Если вертикальная таблица не нужна, то можно сразу вывести по горизонтали, используя макрос из этой темы


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Если вертикальная таблица не нужна, то можно сразу вывести по горизонтали, используя макрос из этой темы

Автор - Pelena
Дата добавления - 28.06.2026 в 08:48
Dalm Дата: Воскресенье, 28.06.2026, 08:50 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
Pelena, Здравствуйте.
Нет - вертикальная таблица нужна.


Сообщение отредактировал Dalm - Воскресенье, 28.06.2026, 08:50
 
Ответить
СообщениеPelena, Здравствуйте.
Нет - вертикальная таблица нужна.

Автор - Dalm
Дата добавления - 28.06.2026 в 08:50
Pelena Дата: Воскресенье, 28.06.2026, 08:56 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 19635
Репутация: 4705 ±
Замечаний: ±

Excel 365 & Mac Excel
Всё равно, проще сразу одновременно выводить и вертикальную и горизонтальную. Потому что таблица изначально формируется блоками по группам.
Так не подойдёт, чтобы сразу выводились два варианта?


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеВсё равно, проще сразу одновременно выводить и вертикальную и горизонтальную. Потому что таблица изначально формируется блоками по группам.
Так не подойдёт, чтобы сразу выводились два варианта?

Автор - Pelena
Дата добавления - 28.06.2026 в 08:56
Dalm Дата: Воскресенье, 28.06.2026, 09:15 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
Pelena, просто первая таблица нужна на том же листе, а горизонтальная разбивка - нужна на другом листе.
 
Ответить
СообщениеPelena, просто первая таблица нужна на том же листе, а горизонтальная разбивка - нужна на другом листе.

Автор - Dalm
Дата добавления - 28.06.2026 в 09:15
Dalm Дата: Воскресенье, 28.06.2026, 10:17 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
Вот поэтому желательно - чтобы это был отдельный макрос
 
Ответить
СообщениеВот поэтому желательно - чтобы это был отдельный макрос

Автор - Dalm
Дата добавления - 28.06.2026 в 10:17
Pelena Дата: Воскресенье, 28.06.2026, 16:03 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 19635
Репутация: 4705 ±
Замечаний: ±

Excel 365 & Mac Excel
отдельный макрос

как скажете)
К сообщению приложен файл: dalm_1.xlsm (24.3 Kb)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
отдельный макрос

как скажете)

Автор - Pelena
Дата добавления - 28.06.2026 в 16:03
Dalm Дата: Воскресенье, 28.06.2026, 21:42 | Сообщение № 8
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
Pelena, спасибо.
Макрос пока работает неточно.
Я удалил некоторые желтые ячейки со словом "Группа" - но макрос все равно расставил таблицы.
Их нужно расставлять под желтыми ячейками со словом "Группа" (а если таких ячеек нет - то вообще ничего не нужно расставлять).
 
Ответить
СообщениеPelena, спасибо.
Макрос пока работает неточно.
Я удалил некоторые желтые ячейки со словом "Группа" - но макрос все равно расставил таблицы.
Их нужно расставлять под желтыми ячейками со словом "Группа" (а если таких ячеек нет - то вообще ничего не нужно расставлять).

Автор - Dalm
Дата добавления - 28.06.2026 в 21:42
Pelena Дата: Воскресенье, 28.06.2026, 23:06 | Сообщение № 9
Группа: Админы
Ранг: Местный житель
Сообщений: 19635
Репутация: 4705 ±
Замечаний: ±

Excel 365 & Mac Excel
Их нужно расставлять под желтыми ячейками со словом "Группа"

то есть, если есть три желтых ячейки со словом Группа, то мы выводим первые три группы?


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
Их нужно расставлять под желтыми ячейками со словом "Группа"

то есть, если есть три желтых ячейки со словом Группа, то мы выводим первые три группы?

Автор - Pelena
Дата добавления - 28.06.2026 в 23:06
cmivadwot Дата: Понедельник, 29.06.2026, 00:10 | Сообщение № 10
Группа: Проверенные
Ранг: Ветеран
Сообщений: 640
Репутация: 142 ±
Замечаний: 0% ±

365
Доброй ночи.. вариант..но надо учесть, что работает с листом вопрос .. не заметил..что уже есть вариант....
К сообщению приложен файл: 7023536.xlsm (42.3 Kb)
 
Ответить
СообщениеДоброй ночи.. вариант..но надо учесть, что работает с листом вопрос .. не заметил..что уже есть вариант....

Автор - cmivadwot
Дата добавления - 29.06.2026 в 00:10
Dalm Дата: Понедельник, 29.06.2026, 03:03 | Сообщение № 11
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
то есть, если есть три желтых ячейки со словом Группа, то мы выводим первые три группы?


Да
 
Ответить
Сообщение
то есть, если есть три желтых ячейки со словом Группа, то мы выводим первые три группы?


Да

Автор - Dalm
Дата добавления - 29.06.2026 в 03:03
Pelena Дата: Вторник, 30.06.2026, 10:26 | Сообщение № 12
Группа: Админы
Ранг: Местный житель
Сообщений: 19635
Репутация: 4705 ±
Замечаний: ±

Excel 365 & Mac Excel
Так?
К сообщению приложен файл: 2118581.xlsm (23.7 Kb)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеТак?

Автор - Pelena
Дата добавления - 30.06.2026 в 10:26
cmivadwot Дата: Вторник, 30.06.2026, 23:43 | Сообщение № 13
Группа: Проверенные
Ранг: Ветеран
Сообщений: 640
Репутация: 142 ±
Замечаний: 0% ±

365
Dalm, Доброй ночи. подправил на активный лист.
Макрос :
На активном листе находит все жёлтые ячейки (заливка RGB(255,255,0)) с текстом «Группа».
Из вертикальной таблицы в столбцах Y:AC (заголовки в строке 17) выделяет блоки данных, разделённые строками «Группа 1», «Группа 2» и т.д. (в столбце Z).
Каждый блок (включая название группы и итоговую строку «Итого по группе X») копирует под соответствующей жёлтой ячейкой в порядке следования жёлтых ячеек слева направо.
При вставке добавляет строку заголовков столбцов (№, Название, Число, Кол-во, Сумма) и копирует ширину столбцов из исходного диапазона.
Игнорирует строку «Итого по группам» (общая итоговая строка).
Если жёлтых ячеек больше, чем групп – лишние области очищаются. Если меньше – выводятся только первые N групп.
Вертикальная таблица остаётся без изменений.
К сообщению приложен файл: gotovo2.xlsm (42.1 Kb)
 
Ответить
СообщениеDalm, Доброй ночи. подправил на активный лист.
Макрос :
На активном листе находит все жёлтые ячейки (заливка RGB(255,255,0)) с текстом «Группа».
Из вертикальной таблицы в столбцах Y:AC (заголовки в строке 17) выделяет блоки данных, разделённые строками «Группа 1», «Группа 2» и т.д. (в столбце Z).
Каждый блок (включая название группы и итоговую строку «Итого по группе X») копирует под соответствующей жёлтой ячейкой в порядке следования жёлтых ячеек слева направо.
При вставке добавляет строку заголовков столбцов (№, Название, Число, Кол-во, Сумма) и копирует ширину столбцов из исходного диапазона.
Игнорирует строку «Итого по группам» (общая итоговая строка).
Если жёлтых ячеек больше, чем групп – лишние области очищаются. Если меньше – выводятся только первые N групп.
Вертикальная таблица остаётся без изменений.

Автор - cmivadwot
Дата добавления - 30.06.2026 в 23:43
Dalm Дата: Среда, 01.07.2026, 12:22 | Сообщение № 14
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
Pelena, cmivadwot, спасибо
 
Ответить
СообщениеPelena, cmivadwot, спасибо

Автор - Dalm
Дата добавления - 01.07.2026 в 12:22
Dalm Дата: Четверг, 02.07.2026, 05:53 | Сообщение № 15
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
cmivadwot, вот этот макрос - вроде работает неплохо.
Но когда в первой таблице - идут формулы, то макрос копирует не значения в ячейках - а сами формулы.
Из-за этого в разложенных по горизонтали таблицах, появляются совершенно не те числа.
Как это исправить ?


Сообщение отредактировал Dalm - Четверг, 02.07.2026, 05:54
 
Ответить
Сообщениеcmivadwot, вот этот макрос - вроде работает неплохо.
Но когда в первой таблице - идут формулы, то макрос копирует не значения в ячейках - а сами формулы.
Из-за этого в разложенных по горизонтали таблицах, появляются совершенно не те числа.
Как это исправить ?

Автор - Dalm
Дата добавления - 02.07.2026 в 05:53
Dalm Дата: Пятница, 03.07.2026, 07:44 | Сообщение № 16
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
То есть вот тут - макрос перетаскивает по горизонтали не текстовые данные, а формулы.
И из-за этого - таблицы идущие по горизонтали - получаются пустые или с какими-то не теми данными.
К сообщению приложен файл: 7023536_2.xlsm (56.8 Kb)
 
Ответить
СообщениеТо есть вот тут - макрос перетаскивает по горизонтали не текстовые данные, а формулы.
И из-за этого - таблицы идущие по горизонтали - получаются пустые или с какими-то не теми данными.

Автор - Dalm
Дата добавления - 03.07.2026 в 07:44
Dalm Дата: Пятница, 03.07.2026, 19:00 | Сообщение № 17
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
Помогите
 
Ответить
СообщениеПомогите

Автор - Dalm
Дата добавления - 03.07.2026 в 19:00
Pelena Дата: Суббота, 04.07.2026, 00:17 | Сообщение № 18
Группа: Админы
Ранг: Местный житель
Сообщений: 19635
Репутация: 4705 ±
Замечаний: ±

Excel 365 & Mac Excel
когда в первой таблице - идут формулы

В моем варианте это будет так
К сообщению приложен файл: dalm_2.xlsm (31.4 Kb)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
когда в первой таблице - идут формулы

В моем варианте это будет так

Автор - Pelena
Дата добавления - 04.07.2026 в 00:17
MikeVol Дата: Суббота, 04.07.2026, 11:13 | Сообщение № 19
Группа: Проверенные
Ранг: Обитатель
Сообщений: 489
Репутация: 120 ±
Замечаний: 0% ±

MSO LTSC 2021 EN
Pelena, Забыли включить обратно обновление экрана в конце кода.[vba]
Код
     Application.ScreenUpdating = True
End Sub
[/vba]


Ученик.
Одесса - Украина
 
Ответить
СообщениеPelena, Забыли включить обратно обновление экрана в конце кода.[vba]
Код
     Application.ScreenUpdating = True
End Sub
[/vba]

Автор - MikeVol
Дата добавления - 04.07.2026 в 11:13
Dalm Дата: Суббота, 04.07.2026, 13:00 | Сообщение № 20
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 206
Репутация: 4 ±
Замечаний: 0% ±

Excel 2019
Pelena, спасибо.
Но почему-то макрос раскладывает группы в горизонталь - не по порядку.
Я удалил одну из желтых ячеек с надписью "Группа".
И макрос в этом месте - как будто - в этом месте поместил таблицу "Группа-2", но не отобразил ее.
То есть таблица "Группа-2" не идет по порядку, а просто куда-то исчезает.
К сообщению приложен файл: 1290406.png (73.2 Kb)
 
Ответить
СообщениеPelena, спасибо.
Но почему-то макрос раскладывает группы в горизонталь - не по порядку.
Я удалил одну из желтых ячеек с надписью "Группа".
И макрос в этом месте - как будто - в этом месте поместил таблицу "Группа-2", но не отобразил ее.
То есть таблица "Группа-2" не идет по порядку, а просто куда-то исчезает.

Автор - Dalm
Дата добавления - 04.07.2026 в 13:00
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2026 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!