Печать 2 короткие страницы на одном листе одновременно.

Программирование на Visual Basic for Applications
Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Печать 2 короткие страницы на одном листе одновременно.

Сообщение Vitaly1 » 02.06.2003 (Пн) 8:34

Задача такова:
Имеется файл Word, в котором длина станицы меньше, чем половина листа. Необходимо печатать два листа документа на одном (один за дргим), на матречном принтере это возможно, а можно как нибудь ( программно или еще как) на других?

corgi
ToyMan
ToyMan
 
Сообщения: 1367
Зарегистрирован: 01.10.2002 (Вт) 9:59
Откуда: Россия, Москва

Сообщение corgi » 02.06.2003 (Пн) 10:15

а в чем проблема то
Код: Выделить всё
    Selection.WholeStory
    Selection.Copy
    Selection.MoveDown Unit:=wdLine, Count:=1
    Selection.TypeParagraph
    Selection.TypeParagraph
    Selection.Paste
   
    ActiveDocument.PrintOut

тем боле какая разница матричный он или лазерный об этом пусть дрова думают

Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Сообщение Vitaly1 » 02.06.2003 (Пн) 13:53

Corgi:
Насколько я понял, твоя программа удваивает текст документа(не понятно зачем), и после этого печатает его.
Но тут другая задача, наверно я не совсем правильно выразился, на одной стороне листа должны печататься две разные страницы подряд, они там могут поместится потому, что длина страницы документа Word установленна меньше половины листа. При чем мне нужно печатать две подряд четные или две подряд нечетные страницы документа на оной из сторон листа.


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot и гости: 31

    TopList