Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Автоматизация расположения QR-этикетки на листе Excel в нужном порядке
 
#1
18.08.2026 20:49:25
Здравствуйте. При выгрузке информации из честного знака в эксель, данные об артикулах в таблице формируются один под другим. Ищу возможность оптимизации рабочего пространства на листе с последующей печатью как этикеток.
Файл пример выгрузки во вложении.
Буду рад подсказке)
Всем мира и добра.
Изменено: Sanja - 19.08.2026 05:44:27
 
 
 
#2
18.08.2026 23:04:19
Так уже и получается самый оптимальный вариант - задаём область печати, если ещё не задана, и печатаем )
 
 
 
#3
18.08.2026 23:35:55
Цитата
написал:
оптимизации рабочего пространства на листе
что это есть в Вашем понимании - ?
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
 
 
#4
19.08.2026 05:14:27
Я так понимаю, что нужно оптимальное расположение этикеток на листе A4(?) для печати?
Сколько этикеток должно быть на листе?
Какой размер этикетки?
Согласие есть продукт при полном непротивлении сторон
 
 
 
#5
19.08.2026 05:20:17
Этикетки обычно печатают на принтере для этикеток и на носителе который к А4 не имеет отношения...
А здесь если погадать просто нужно визуальное заполнение этикетками области экрана... но опять же какой масштаб... )
 
 
 
#6
19.08.2026 08:29:48
Да, этикетки печатают на принтере для этикеток, но в 1-ом случае из 3-х нужна альтернатива печати на этом принтере. Почему собственно и задался этим вопросом. Пытаюсь подстроить вот под это - Этикетки самоклеящиеся Комус (ProMega Label) 38х19 мм 75 штук на листе. Предполагаю, что тут без VBA не обойтись. Пока получилось лишь, перенести их новую вкладку.  
 
 
 
#7
19.08.2026 09:14:24
AV13, для этого есть специальные программы по допечатной подготовке, или проще -виртуальные принтеры.
там очень гибкие настройки
вот пример
 
 
 
#8
19.08.2026 09:19:39
Здравствуйте.
Не очень понятно что значит:
Цитата
написал:
но в 1-ом случае из 3-х нужна альтернатива печати на этом принтере.
Нужен какой-то макрос на vba в котором будете что-то настраивать (например, с какого ряда этикеток на листе начинать печать и т.д.)? И еще почему на новый лист не перенесли код DataMatix? Он там не нужен или это что-то у меня не так?
 
 
 
#9
19.08.2026 10:59:32
nilske благодарю за идею, но есть сложности с использованием сторонних ресурсов в части информационной политики. Aлeкceй, код DataMatix так же нужно переносить, но пока я пытаюсь хотя бы расположить их в удовлетворяющем меня порядке, а это, если грубо, 5 ед в строке и таких 15 строк и "подтесать" это все под эту бумагу -  Этикетки самоклеящиеся Комус (ProMega Label) 38х19 мм.    
 
 
 
#10
19.08.2026 17:07:42
Можно уменьшить размер кода DataMatrix? Это я к тому, что у меня не помещается текст в объединенную ячейку.
 
 
 
#11
19.08.2026 20:27:47
Да, Aлeкceй, можно уменьшить
 
 
 
#12
19.08.2026 21:13:35
Немного улучшил результат. DataMatrix не понимаю как "припаять" к нужной ячейке
 
 
 
#13
19.08.2026 22:00:04
Aлeкceй, +/- вот так, но нет DataMatrix и не вся информация читаема. В частности в ячейках, где указана дата производства текст не перенесен. Возможно нужно уменьшить шрифт...  
 
 
 
#14
19.08.2026 22:17:09
пока что сделал только копирование штрихкодов с листа "Лист_1" на лист "Результат". макрос называется copyShapes
Изменено: Aлeкceй - 20.08.2026 07:59:26
 
 
 
#15
20.08.2026 09:30:54
а у меня "ругается", "говорит не могу найти то что вы хотите найти"
 
 
 
#16
20.08.2026 10:01:29
Здравствуйте.
А может быть вариант в файле подойдет? Немного изменил макрос который был в файле. Картинки и ячейки можно изменить по размерам, при необходимости разместить на листе другое количество.
Изменено: gling - 20.08.2026 10:10:34
 
 
 
#17
20.08.2026 10:03:53
можно увидеть само сообщение?
 
 
 
#18
20.08.2026 20:30:35
Aлeкceй, прошу прощения немного ввел Вас в заблуждение. На работе вообще почему то не срабатывает, выводя.....

Дома, макрос срабатывает единожды, то есть при открытии книги запускаем макрос результат есть! и, если повторить процедуру, удалив вкладку "результат" запустив цикл вновь уже "ругается". Но возможно это правильно.  
Изменено: AV13 - 20.08.2026 20:37:39
 
 
 
#19
20.08.2026 20:46:38
gling, Здравствуйте. Благодарю Вас! Практически то что нужно. И вот хочу "подтесать" под лист этой бумаги -  Этикетки самоклеящиеся Комус (ProMega Label) 38х19 мм. (фото). Если позволите, посмотрю Ваш код, может пойму что "докрутить".    
 
 
 
#20
20.08.2026 21:25:43
Цитата
написал:
Ваш код

Там нет моего кода, этот код был в файл когда я его скачал из сообщений #13. Я этот макрос чуток изменил, изменил размер ячейки, диапазон просмотра и количество максимальных столбцов. И добавил вставку не диапазона ячеек, а картинку. В макросе это видно. Правьте сколько хотите под свои нужды. Раз вам это прислали, значит это ваше.  
 
 
 
#21
20.08.2026 21:30:17
Цитата
написал:
И добавил вставку не диапазона ячеек, а картинку
вот здесь вы сильно продвинули решение моего вопроса
Изменено: AV13 - 20.08.2026 21:30:51
 
 
 
Страницы: 1
Читают тему
Наверх