1 Тема от Nadiia Andriychenko

  • Nadiia Andriychenko
  • Member
  • Неактивен
  • Зарегистрирован: 2016-11-03
  • Сообщений: 15

Тема: Отчет в Excel

Добрый день!
Проблема состоит в следующем. Необходимо получить отчет в Excel на листе с альбомной ориентацией.
В хранилища XLS-шаблонов находится шаблон, предусматривающий  альбомную ориентацию листа.
В результате выполнения
oSQL:executeDirect("SELECT * FROM xls WHERE name='209-1.xls'")
FERASE(cTarget)
oSQL:binaryToFile('xls',cTarget)
oExcel :=CreateObject("Excel.Application")
oExcel:DisplayAlerts:= .F.
oExcel:visible      := .F.
oWorkBooks          := oExcel:workbooks
oBook               := oWorkBooks:open(cTarget)
открывается шалон с альбомной ориентацией.
После заполнения шаблона данными и выполнения
oBook:save()
лист меняет ориентацию  на книжную и требует ручной настройки перед выводом на печать.
Подскажите, пожалуйста, как можно сохранить ориентацию листов отчета  при выводе на печать.

2 Ответ от Yury Vitovsky

  • Yury Vitovsky
  • Yury Vitovsky
  • Member
  • Неактивен
  • Зарегистрирован: 2016-05-11
  • Сообщений: 161

Re: Отчет в Excel

Здравствуйте!
Первое, что приходит на ум - перед сохранением сделать

oBook:ActiveSheet:PageSetup:Orientation := 2 // 2 это xlLandscape

3 Ответ от Nadiia Andriychenko

  • Nadiia Andriychenko
  • Member
  • Неактивен
  • Зарегистрирован: 2016-11-03
  • Сообщений: 15

Re: Отчет в Excel

Спасибо!!!!! Все получилось на всех 15 листах отчета.

4 Ответ от oit138

  • oit138
  • New member
  • Неактивен
  • Зарегистрирован: 2016-08-11
  • Сообщений: 2

Re: Отчет в Excel

Доброе утро!
Подскажите,пожалуйста, можно ли  подножие вывести на одной странице  с отчетом ?

5 Ответ от Yury Vitovsky

  • Yury Vitovsky
  • Yury Vitovsky
  • Member
  • Неактивен
  • Зарегистрирован: 2016-05-11
  • Сообщений: 161

Re: Отчет в Excel

Подножие на отдельном листе сделано специально, т.к. в противном случае на нем при печати возникают сквозные строки шапки.
Однако, обойти это можно, написав самостоятельно дополнительный макрос в книге \Win32\MyMacro.xls и вызвав его в свойствах отчета.