|
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) поспешил с выводом, просто никогда не работал с йокселем, щас разобрался все работает как надо.
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |