ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Автоматическое нумерование копий в Excel-е
4 сообщений из 4, страница 1 из 1
Автоматическое нумерование копий в Excel-е
    #33024745
Korax
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Korax
Гость
Подскажите, как проще сделать, сам что-то не соображу...
Вообщем из Excel-я печатается какая-то страница, копий 100 например.
И надо сделать так, чтобы в каждой следующей копии, которая выходит из принтера, одна конкретная ячейка, пусть А1 например, содержала бы номер копии. Возможно ли такое?
Если ламерский вопрос, заранее прошу прощения... :)
...
Рейтинг: 0 / 0
20.04.2005, 11:15
| Ответить | Цитировать | Написать  
Автоматическое нумерование копий в Excel-е
    #33026498
Yuraz.com
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Yuraz.com
Участник
Это и есть нумерация страниц вообще то...
А если надо нумеровать документы как талончики на тролейбус, у каждого свой номер, то тут надо подготовть файл, перегнать в bmp например, загнать его в одну из программ, которая умеет печатать переменные данные.
Posted via ActualForum NNTP Server 1.1
...
Рейтинг: 0 / 0
20.04.2005, 22:06
| Ответить | Цитировать | Написать  
Автоматическое нумерование копий в Excel-е
    #33026538
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
KoraxПодскажите, как проще сделать, сам что-то не соображу...
Вообщем из Excel-я печатается какая-то страница, копий 100 например.
И надо сделать так, чтобы в каждой следующей копии, которая выходит из принтера, одна конкретная ячейка, пусть А1 например, содержала бы номер копии. Возможно ли такое?
Если ламерский вопрос, заранее прошу прощения... :)
Напрямую нельзя. Но можно сделать макрос типа:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Sub Print_With_Copies()
   Dim iCopyNumber as Integer, iTotalCopies as Integer

   iTotalCopies =  100  // можно заменить на константу, или как параметр функции или что угодно :)

   For iCopyNumber= 1  To iTotalCopies
       ActiveSheet.Range("A1") = "Copy #" & iCopyNumber
       ActiveSheet.PrintOut
   Next
End Sub
При желании можно номер копии записывать не в ячейку, а например в заголовок листа...
...
Рейтинг: 0 / 0
20.04.2005, 22:51
| Ответить | Цитировать | Написать  
Автоматическое нумерование копий в Excel-е
    #33026870
Korax
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Korax
Гость
Спасибо большое за ответы! Буду пробовать...
...
Рейтинг: 0 / 0
21.04.2005, 09:59
| Ответить | Цитировать | Написать  
4 сообщений из 4, страница 1 из 1
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Автоматическое нумерование копий в Excel-е
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]