Печать
01.01.2007
Печать
После всех настроек и просмотра печати можно переходить непосредственно к печати документа. Для этого будем использовать метод PrintOut объекта "Лист" коллекции Sheets. В функции Print в качестве аргументов передаем номер или имя листа и количество копий для печати.Function Print (sheet:variant;copies:integer):boolean;Для расширения возможностей печати можем использовать весь набор аргументов метода PrintOut. Например, для задания печати 2-х копий со 2-й по 3-ю страницу используем метод и набор следующих аргументов: PrintOut(from:=2, To:=3, Copies:=2);
begin
Print:=true;
try
E.ActiveWorkbook.Sheets.Item
[sheet].PrintOut(Copies:=copies);
except
Print:=false;
end;
End;