TLDR: Могу ли я автоматически отправить диалоговое окно печати с VBA?
У меня есть таблица Excel с данными товаров со столбцами [numberOfCopies, name, size, weight, price] - максимум 30 товаров (30 строк для разных items).
У меня есть макрос VBA, который копирует данные из этой таблицы в другую специальную электронную таблицу «Метка», выделяет область и открывает диалоговое окно печати, чтобы напечатать столько копий, сколько я хочу.
ActiveSheet.Range("A1:D7").Select
Application.Dialogs(xlDialogPrint).Show , , , numberOfCopies, , , , , , , , 1
Как это работает прямо сейчас:
- Я нажимаю кнопку «Печатать все», которая запускает макрос
- Для каждой строки таблицы:
- Проверяется, есть ли информация о продукте в строке
- Если да: скопируйте данные на этикетку и откройте xlDialogPrint
В результате мне нужно нажать 1 кнопку, а затем нажать Enter X раз, 1 раз для каждого строка, чтобы отправить диалоговое окно печати. Есть ли способ автоматической отправки диалогового окна, поэтому я просто нажимаю 1 кнопку?