helpf.pro
Регистрация

v8.3: Конвертация экселя в картику

Feliks1961
14.12.2015 12:23Прочитано: 1790

На листе экселя есть картинки, надписи, таблицы в произвольной форме. Как это чудище с конвертировать в картинку. Нашел процедуру

Функция Конвертировать();

ФайлПрограммы = НовыйФайл("C:\Program Files\Bullzip\PDF Printer\gs\gswin32c.exe");

Если Не ФайлПрограммы.Существует() Тогда ТекстСообщения = "Не установлена программа - Bullzip"; ОбщегоНазначенияКлиентСервер.СообщитьПользователю(ТекстСообщения);

Возврат "";

КонецЕсли;

ИмяКартинки = "Проба";

ПринтерPDF.SetValue("output", "D:\" +ИмяКартинки + ".jpg");

ПринтерPDF.SetValue("ShowSaveAS", "never");

ПринтерPDF.SetValue("ShowProgress", "no");

ПринтерPDF.SetValue("ShowProgressFinished", "no");

ПринтерPDF.SetValue("ShowSettings", "never");

ПринтерPDF.SetValue("ShowPDF", "no");

ПринтерPDF.SetValue("ConfirmOverwrite","no");

ПринтерPDF.SetValue("Device","jpeg");

ПринтерPDF.WriteSettings();

НастройкиПечатиОриентация= 1;// 1 - портерт, 2 - ландшафт.

НастройкиПечатиМасштаб= 100;// масштаб в процентах.

НастройкиПечатиРазложитьПоКопиям = 1;// 0 - не разбирать по копиям, 1 - разобрать по копиям.

НастройкиПечатиПолеЛев= 10;

НастройкиПечатиПолеПрав= 10;

НастройкиПечатиПолеВерх= 10;

НастройкиПечатиПолеНиз= 10;

НастройкиПечатиКолонтитулВерх= 0;

НастройкиПечатиКолонтитулНиз= 0;

НастройкиПечатиАвтомасштабПоШирине = 1;// 1 - включить, 0 - выключить.

НастройкиПечатиЧерноБелаяПечать = 0;// 1 - включить, 0 - выключить.

НастройкиПечатиИмяПринтера = "Bullzip PDF Printer";// Имя принтера в ОС

Таб.ПараметрыСтраницы(НастройкиПечатиОриентация, НастройкиПечатиМасштаб, НастройкиПечатиРазложитьПоКопиям,

НастройкиПечатиПолеЛев, НастройкиПечатиПолеПрав, НастройкиПечатиПолеВерх, НастройкиПечатиПолеНиз,

НастройкиПечатиКолонтитулВерх, НастройкиПечатиКолонтитулНиз, НастройкиПечатиАвтомасштабПоШирине,

НастройкиПечатиЧерноБелаяПечать, НастройкиПечатиИмяПринтера);

Таб.КоличествоЭкземпляров(1);

Таб.Напечатать(0);

КонецФункции;

Но есть вопрос? Как перетащить лист экселя в Таб? Нашел много способов и на этом форуме но перетаскиваются только текстовые данные, а мне нужно все.

Yandex
Возможно, вас также заинтересует
Реклама на портале
E_Migachev
16.12.2015 15:36Ответ № 1

сложным путем идете...

ищите как средствами екселя сохранить лист в PDF далее работайте с этим файлом

Подсказка: Вы можете добавить любую страничку в Избранное щелкнув по значку
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.