Печать страницы Excel не показывая самого Excel ?

← →
DmiSb (2005-01-14 07:46) [0]

Программно заполняется табличка в Excele. При этом сам Excel не показывается пользователю. Как в этом случае программно отправить заполненную страницу на печать ?
Заранее спасибо.

← →
Qwe (2005-01-14 11:45) [1]

← →
DmiSb (2005-01-14 12:25) [2]

Процедура такая

exl := CreateOleObject("Excel.Application");
exl.DisplayAlerts := false;
WorkBook := exl.Application.WorkBooks.Add(filename);
Sheet := WorkBook.WorkSheets[1];

При попытке exl.Print; выходит ошибка,
что такой метод не поддерживается.

← →
asafr © (2005-01-14 12:35) [3]

PrintOut

← →
DmiSb (2005-01-14 13:34) [4]

2 asafr

Да PrintOut заработал, но оказывается надо выделить диапазон и его печатать, типа:

Sheet.Range["A1:K23"].Select;
exl.Selection.PrintOut;

Интересно, а где можно подсмотреть еще, как задать при этом параметры вывода на печать. Типа кол-ва копий.

Спасибо за помошь.

← →
Cobalt © (2005-01-14 16:38) [5]

Запускаешь запись макроса.
производишь требуемые действия.
Останавливаешь запись макроса.
Смотришь его код.

← →
DmiSb (2005-01-14 21:13) [6]

Прошу простить за дремучесть. Раньше это не нужно было, а теперь вот понадобилось.

Код макроса я смотрел.
Вот печать одной страницы

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Но как это первести для Delphi, что-то не соображу. Куда эту Copies:=1 прилепить ?

← →
YurikGL © (2005-01-14 21:26) [7]

> DmiSb (14.01.05 21:13) [6]

Попробуй
PrintOut(EmptyParam,EmptyParam,количество копий);

А вообще, кидаешь на форму ExcelWorksheet1 нажимаешь ктрл+пробел и смотришь

← →
DmiSb (2005-01-15 19:23) [8]

Небольшое пояснение: я тут KOL осваивать начал, потому есть некоторые отличия от "кидаешь на форму ExcelWorksheet1". Там этого нет - но зато приложение малюсенькое.

> DmiSb (15.01.05 19:23) [8]

дык ты в другом пустом приложении кинь на форму ExcelWorksheet1 и посмотри его свойства...

← →
DmiSb (2005-01-17 06:27) [10]

Зы-ы. Действительно ;)
Спасибо.

Печать страницы Excel не показывая самого Excel ? Найти похожие ветки