Проблема с экспортом CALC в PDF

[Kadet]

Возникла такая непредвиденная проблема.
В своей БД создаю много эскизов и табличных листов CALC. С помощью функций:

Код Выделить Развернуть

oData = oDoc.CurrentController.getTransferable()
'****************
vComp.CurrentController.insertTransferable(oData)

Экспортирую эти результаты в новый документ calc. В БД формируются несколько двойных листов, т.е. похожие эскизы на два экрана с прокруткой. При переносе в новый документ разношу эти страницы по разным листам calc.
По завершении этой процедуры предполагается конечная редакция текстовки документа и экспорт его уже в PDF, для отправки по эл.почте.

Однако, несмотря на то, что двойные страницы были разнесены по разным листам в итоговом документе все вторые страницы пропадают. Не понятный финт от Libre.
А вот, если переносить спаренные страницы как есть - в PDF экспортируются оба листа.
Кто-нибудь знает причину и решение?

[kompilainenn]

Однако, несмотря на то, что двойные страницы были разнесены по разным листам в итоговом документе все вторые страницы пропадают. Не понятный финт от Libre.

Так в ПДФ экспортируеся только текущий лист, емнип. В настройках экспорта в ПДФ нужно чтобы стоял вариант "Все"

[Kadet]

Так в ПДФ экспортируеся только текущий лист, емнип. В настройках экспорта в ПДФ нужно чтобы стоял вариант "Все"

Я не смотрел эти настройки у себя, но... тот ПДФ, который я выложил для примера сделан простым финтом - открываю calc на любом листе и в панели инструментов, между "дискетой" "сохранить" и принтором есть кнопка в виде листа - "экспорт в PDF". Нажимаю и в итоге экспортируется весь документ... все листы... за исключением описыных выше.

[mikekaganski]

У Вас на листе "Торцы-2" диапазон печати "$A$55:$O$107". Включите режим отображения разметки страниц (второй сверху пункт меню "Вид", англ. "Page Break", не уверен, как в переводе).

[Kadet]

У Вас на листе "Торцы-2" диапазон печати "$A$55:$O$107"

Огромное спасибо за помощь. Теперь всё ясно. Действительно так. Ща поправлю.

[Kadet]

Эта проблема решена, но откуда-ни-возьмись появилась другая.
Пытаюсь выровнять ширину последнего столбца под видимую ширину страницы.
Всё получается, но при экспорте портятся эскизы, причём на только на этих двойных страницах.
Вот такая фигня получается.

[mikekaganski]

Пытаюсь выровнять ширину последнего столбца под видимую ширину страницы.
Всё получается, но при экспорте портятся эскизы, причём на только на этих двойных страницах.

Мой магический кристалл подсказывает, что ошибка в строке 45 второго модуля, вместо плюса стоит умножение. Или нет.

[Kadet]

Тоже вокрутил-повертел и нашёл. Широченный столбец.
Так вообще-то минус стоит:

Код Выделить Развернуть

Xmax = oDoc.CurrentController.VisibleArea.Width
j = oDoc.CurrentController.VisibleRange.EndColumn
oSheet.Columns(j+1).width = Xmax - oSheet.getCellByPosition(j+1, 0).Position.X

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

Спасибо за поддержку.