|
v7: Вопрос знатакам Yoksel | ☑ | ||
---|---|---|---|---|
0
dimm7310
12.04.13
✎
08:41
|
Есть прайс с группировками, необходимо не открывая форму на предпросмотр сохранить в XLS файл.
вот фрагмент последних строк кода (выдрано из примера с небольшими изменениями) Документ.ЗагрузитьИзТаблицы(ИсхТабл); Если ТипЗначенияСтр(ПанельИнструментов) <> "Йоксель.ПанельИнструментов" Тогда Фрейм = Документ.Показать("Прайс лист с группировками"); Фрейм.ОтображатьСтруктуру(1); Фрейм.ОтображатьКнопкиУровней(1); Панель = Фрейм.ПанельИнструментов; //Панель.Видимость = 1; // Обратите внимание если у Вас переписана ОбработкаЯчейкиТаблицы и ее события то следущие // строки нужно привести к тому виду, какой он должен быть в Вашей конфигурации! Панель.ПодписатьсяНаСобытие("ОбработкаЯчейкиТаблицы", "ОбработкаЯчейкиТаблицы", 1); Иначе Панель = ПанельИнструментов; КонецЕсли; Кнопка = Панель.ДобавитьКнопку("Обновить"); Кнопка.Заголовок = "Обновить"; Кнопка.Значение = РасшифровкаОбновить(1); Кнопка = Панель.ДобавитьКнопку("Настройка"); Кнопка.Заголовок = "Настройка"; Кнопка.Значение = РасшифровкаОбновить(2); Документ.УдалитьСтроки(1,2); // Удаляем Настройка и Обновить // Установка группировок строк ГруппыСтрок.ВыбратьСтроки(); Пока ГруппыСтрок.ПолучитьСтроку () = 1 Цикл Если (ГруппыСтрок.Окончание =0) Или (ГруппыСтрок.Начало =0) Тогда Продолжить; КонецЕсли; Если ГруппыСтрок.Окончание < ГруппыСтрок.Начало Тогда Продолжить; КонецЕсли; Документ.ДобавитьГруппуСтрок(ГруппыСтрок.Начало-2,ГруппыСтрок.Окончание-2); КонецЦикла; // Свертка всех группировок Йоксель Для инд = -Документ.КоличествоУровнейГруппировкиСтрок() По -1 Цикл Документ.ПоказатьУровеньГруппировокСтрок (-инд); КонецЦикла; Документ.ОбновитьВсеОтображения(); |
3 |
||
1
dimm7310
12.04.13
✎
08:43
|
в начале кода:
Если ТипЗначенияСтр(ПанельИнструментов) <> "Йоксель.ПанельИнструментов" Тогда Документ = СоздатьОбъект ("ТабличныйДокумент"); Иначе Документ = ПанельИнструментов.Документ; Документ.Очистить (); КонецЕсли; |
|||
2
ADirks
12.04.13
✎
08:51
|
Тебе в файл, или группировок навернуть?
Так то Йоксель = СоздатьОбъект("ТабличныйДокумент"); Йоксель.ЗагрузитьИзТаблицы(Т); Йоксель.Записать(ИмяФайла, 1); |
4 5 |
||
3
Ёпрст
12.04.13
✎
08:53
|
(0) используй объект КонвертерExcel
|
|||
4
dimm7310
12.04.13
✎
08:53
|
(2) просто сохранить в файл (группировки уже все есть)
|
5 |
||
5
Ёпрст
12.04.13
✎
08:54
|
||||
6
dimm7310
12.04.13
✎
09:04
|
спасибо сохранить получилось (я думал это сложнее).
еще вопросик: нужно несколько колонок сделать скрытыми и для одной назначить формулу. Можно ли это сделать в Йоксель или нужно открывать сохраненный XLS файл с помощью Excel.Application и назначать колонке? |
8 |
||
7
monsterZE
12.04.13
✎
17:23
|
дабы не плодить тем.. а закрепление строк, при сохранении теряется или, это я что-то не так делаю? =)
и.. пока не ковырял, но вроде ексель поддерживает документы с несколькими листами. так вот, он поддерживает их, только при чтении из xls или при формировании и отображении в своей форме тоже? и еще - все слить в один файлик из разных баз с сохранением группировок?.. контроль+ц контроль+в группировки теряются.. =\ |
|||
8
monsterZE
12.04.13
✎
17:24
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |