Скопировать строки из заголовка в столбец слева

@EkonomistUK · Регистрация: 03.10.2024

Студворк — интернет-сервис помощи студентам

Добрый день. Помогите пожалуйста. Очень часто по работе сталкиваюсь с файлами, которые нужно преобразовать в удобную таблицу, чтобы потом строить сводные таблицы. Но каждый раз, это ручной труд, который отнимает много времени..
Пример исходника вот такой:

ромашка
1 1
2 1
3 1
одуванчик
4 1
6 3
цветочек
7 4
8 5
9 6

а надо что было 3 столбца:
ромашка 1 1
ромашка 2 1
ромашка 3 1
одуванчик 4 1
одуванчик 6 3
цветочек 7 4
цветочек 8 5
цветочек 9 6

С VBA не знакома, может какая-то формула есть о которой я не знаю... помогите пожалуйста

@Zeag · 12.10.2024, 20:27

Прошу пардону за позднее добавление и возможное непонимание (болел, еще не совсем оправился) - а нельзя определять названия блоков по количеству значений в строке? Если Trim(Cells(i, "B")) = "" - это заголовок, запоминаем его. Если не пусто - это данные, ставим заголовок и данные смещаем.

Новые блоги и статьи Все статьи Все блоги /
ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Nekobox - outbounds[0].transport: unknown transport type: raw damix 01.10.2026 Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@EkonomistUK 0 / 0 / 0 Регистрация: 03.10.2024 Сообщений: 9

	Скопировать строки из заголовка в столбец слева 04.10.2024, 09:13. Показов 1670. Ответов 20 Метки нет (Все метки) Добрый день. Помогите пожалуйста. Очень часто по работе сталкиваюсь с файлами, которые нужно преобразовать в удобную таблицу, чтобы потом строить сводные таблицы. Но каждый раз, это ручной труд, который отнимает много времени.. Пример исходника вот такой: ромашка 1 1 2 1 3 1 одуванчик 4 1 6 3 цветочек 7 4 8 5 9 6 а надо что было 3 столбца: ромашка 1 1 ромашка 2 1 ромашка 3 1 одуванчик 4 1 одуванчик 6 3 цветочек 7 4 цветочек 8 5 цветочек 9 6 С VBA не знакома, может какая-то формула есть о которой я не знаю... помогите пожалуйста 0

@Zeag 860 / 510 / 187 Регистрация: 09.03.2009 Сообщений: 1,732
	12.10.2024, 20:27
	Прошу пардону за позднее добавление и возможное непонимание (болел, еще не совсем оправился) - а нельзя определять названия блоков по количеству значений в строке? Если Trim(Cells(i, "B")) = "" - это заголовок, запоминаем его. Если не пусто - это данные, ставим заголовок и данные смещаем. 0