Форум программистов, компьютерный форум, киберфорум
Surrogate
Войти
Регистрация
Восстановить пароль

Создание листа в книге в виде шаблона

Запись от Surrogate размещена 18.04.2014 в 14:22
Показов 877 Комментарии 0

Цитата Сообщение от Андреас-сус Посмотреть сообщение
Добрый день, форумчане!

По работе необходимо делать однообразные действия. Но чет никак сообразить не могу, да и язык(VBA) знаю так себе. Поэтому прошу помощи у Вас!

Есть некий список со значениями(допустим 10, но может быть и больше) на листе1, есть шаблон, в который нужно вставить каждое из значений. В итоге должна получится книга состоящая из Лист1(список значений) + 10 листов с шаблонами, в которых будут фигурировать(в одной из ячеек, например А2) значения из списка.

Пример того чего необходимо достичь:
Лист1 - Список значений
Лист2 - Шаблон со значением1 из А1 на Листе1, в ячейке А2
Лист3 - Шаблон со значением2 из А2 на Листе1, в ячейке А2
Лист4 - Шаблон со значением3 из А2 на Листе1, в ячейке А2

и т.д.

Примерное описание процесса:

Есть книга, в ней один лист, на котором в столбце А находится список. Необходим цикл, который бы перебирал этот список до конца(пустой ячейки) и останавливался. Действия такие, смотрим в первую ячейку из списка, если пустая заканчиваем макрос, если не пустая создаем новыq лист на котором будет шаблон под названием "rabota", копируем значение из списка на первом листе и вставляем в созданный лист в ячейку А2(например). Переходим к следующей ячейке из списка на первом листе, с проверкой на наличия в нем значения, для продолжения процесса, либо остановки.



Имя файла и листов неважно, потом это все распечатается и удалится

Надеюсь описал понятно.
Заранее огромнейшее спасибо!
как все запущено
Размещено в Без категории
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Новые блоги и статьи
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 и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru