|
v7: Сохранение в Excel |
☑ |
0
NemeL
13.06.12
✎
11:22
|
Добрый день, подскажите в чем проблема и как ее решить, выводу документ на печать, открывается форма предварительного просмотра, и Сохраняю как - таблица Excel,сохранил, открываю Excel-документ, а там проловина текста не сохранилось. В чем проблема?
|
|
1
SanGvin
13.06.12
✎
11:23
|
(0) попробывать раздвинуть строки ячеек
|
|
2
Venom
13.06.12
✎
11:24
|
Длина строки ячейки обрезается до 128 (помоему по памяти) символов.
|
|
3
NemeL
13.06.12
✎
11:24
|
(1) в excel? если там то пробывал ничего там нету
|
|
4
Venom
13.06.12
✎
11:25
|
(2) поправка 255 символов.
|
|
5
Попытка1С
13.06.12
✎
11:25
|
(0) Йоксель себя спасет.
|
|
6
Попытка1С
13.06.12
✎
11:27
|
тебя т.е. )
|
|
7
NemeL
13.06.12
✎
11:35
|
(5) Спасибо, так то все работает и сохраняется, но требует большего количества действий, чтоб сохранить в Excel файл, т.е никакой автоматизации(((
|
|
8
NemeL
13.06.12
✎
12:37
|
еще вопрос: как создать новый документ в ойкселе?
[Code]
Если ВыгрузитьВФайл = 1 тогда
ПолноеИмяФайла = КаталогИБ() + "Счет.mxl";
Если ФС.СуществуетФайл(ПолноеИмяФайла) = 1 Тогда
ФС.УдалитьФайл(ПолноеИмяФайла);
КонецЕсли;
Таб.Записать(ПолноеИмяФайла, "XMLS");
Йоксель = СоздатьОбъект ("Йоксель");
Документ = Йоксель.СоздатьТабличныйДокумент ();
Документ.Открыть(ПолноеИмяФайла,2,0);
[/code]
хочу сначало выгрузить печатную форму в таблицу, а потом чтоб йоксель открыл ее, только вот как подключиться в нему ?
|
|
9
oleg_prg
13.06.12
✎
12:42
|
Процедура ОткрытьДокумент()
Файл = "D:\MOЙ.XLS";
ЗапуститьПриложение(Файл);
КонецПроцедуры
|
|
10
oleg_prg
13.06.12
✎
12:51
|
Если интересует как работать с EXCEL на уровне OLE, то вот так
ОкноExcel = СоздатьОбъект("Excel.Application");
ОкноExcel.Workbooks.Open("F:\План_Счетов-2012.xls");
Для А = 1 По ОкноExcel.Worksheets.Count Цикл
Сообщить(ОкноExcel.Worksheets(А).Name);
КонецЦикла;
//Прочитаем данные
Для А = 1 По 20 Цикл
Сообщить(ОкноExcel.Worksheets(1).Range("A"+СокрЛП(А)).Value);
Сообщить(ОкноExcel.Worksheets(1).Range("B"+СокрЛП(А)).Value);
КонецЦикла;
//Визуальное открытие
//вроде вот так
ОкноExcel.Visible = 1;
ОкноExcel.Activate();
ОкноExcel.Application.WindowState = 1;
//По OLE командам смотри HELP VB в продуктах MS OFFICE
|
|
11
NemeL
13.06.12
✎
14:18
|
(9)(10) спасибо, проблема решена.
|
|
12
andrewks
13.06.12
✎
14:20
|
(7) всё автоматизируется, не надо ля-ля
|
|
13
NemeL
13.06.12
✎
15:03
|
(12) поспешил с выводом, просто никогда не работал с йокселем, щас разобрался все работает как надо.
|
|
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший