Можно комментарий вставить? Я сам что-то никак до дела не доберусь, но слежу Николай, мой код печатает по одному листу заданное количество наклеек, и даже если будет задано 1000 штук wer, он будет выплёвывать листы с наклейками (но можно отказаться любой печатать), пока это wer не будет распечатано. По крайней мере, так задумывалось. И Leekc похоже его понял и изменил под себя (я не изучал, так слегка глянул). Задавать сразу определённое количество листов имхо неправильно - или не хватит, или лишная небесплатная бумага будет переводиться.
Можно комментарий вставить? Я сам что-то никак до дела не доберусь, но слежу Николай, мой код печатает по одному листу заданное количество наклеек, и даже если будет задано 1000 штук wer, он будет выплёвывать листы с наклейками (но можно отказаться любой печатать), пока это wer не будет распечатано. По крайней мере, так задумывалось. И Leekc похоже его понял и изменил под себя (я не изучал, так слегка глянул). Задавать сразу определённое количество листов имхо неправильно - или не хватит, или лишная небесплатная бумага будет переводиться.Hugo
То был промежуточный вариант. Вот теперь с подписью. Вроде все учел. (извел 2 (два) листа бумаги )
Для Игоря. Можно и по-твоему сделать. Лекс говорит, что, мол, листов 10-15 максимум. Поэтому подумалось сделать шаблон сразу на все листы, а печатать и сохранять только нужную часть. Так быстрее и вообще лучше (ну, я так думаю). (не нашел думающего смайлика. что есть:) - это вот типа я так думаю.
То был промежуточный вариант. Вот теперь с подписью. Вроде все учел. (извел 2 (два) листа бумаги )
Для Игоря. Можно и по-твоему сделать. Лекс говорит, что, мол, листов 10-15 максимум. Поэтому подумалось сделать шаблон сразу на все листы, а печатать и сохранять только нужную часть. Так быстрее и вообще лучше (ну, я так думаю). (не нашел думающего смайлика. что есть:) - это вот типа я так думаю.
Для Николая - Извини, я в твой код не вникал - такой подход разумен, если точно много листов не будет. Но тогда сперва вероятно юзеру нужно сказать, сколько листов наклеек в принтер сунуть нужно Просто мой код из другой задачи растёт, там про количество ничего не говорилось вроде (уже не помню...)
Для Николая - Извини, я в твой код не вникал - такой подход разумен, если точно много листов не будет. Но тогда сперва вероятно юзеру нужно сказать, сколько листов наклеек в принтер сунуть нужно Просто мой код из другой задачи растёт, там про количество ничего не говорилось вроде (уже не помню...)Hugo
Получилось как-то так... Только надо еще доработать ... 1. не работает если не создан пустой файл 123.xls 2. 123.xls надо все время чистить, удалять созданные ранее листы, лучше бы каждуй раз создавалась новая книгас именем допустим дата-время, ну или все равно каким а так с Вашей помощью потихоньку продвигается
Получилось как-то так... Только надо еще доработать ... 1. не работает если не создан пустой файл 123.xls 2. 123.xls надо все время чистить, удалять созданные ранее листы, лучше бы каждуй раз создавалась новая книгас именем допустим дата-время, ну или все равно каким а так с Вашей помощью потихоньку продвигается Leekc
Думаю, вполне можно wb.SaveAs Filename:=".... приспособить в конце кода. Что удобно - всегда можно сортировкой легко найти нужный файл.
Да, и по теме - там ещё нужно с кнопкой разобраться - убрать из печати, из сохранённых копий листов (я кстати потому код из листа убрал, чтобы он в копиях не сохранялся...) Или может код запускать не кнопкой, а по горячим клавишам или по кнопке на листе с данными?
По сохранению файла вот код, который я использую: [vba]
Код
Private Sub Workbook_BeforeClose(Cancel As Boolean) On Error GoTo finish
Думаю, вполне можно wb.SaveAs Filename:=".... приспособить в конце кода. Что удобно - всегда можно сортировкой легко найти нужный файл.
Да, и по теме - там ещё нужно с кнопкой разобраться - убрать из печати, из сохранённых копий листов (я кстати потому код из листа убрал, чтобы он в копиях не сохранялся...) Или может код запускать не кнопкой, а по горячим клавишам или по кнопке на листе с данными?Hugo