Главное правильный смысмл =)
Главное правильный смысмл =)
Раньше же было даже в стандартных типах сравнения термин "В Иерархии", а потом его заменили на "В группе". Все думал для кого это сделали, когда уже на протяжении пары лет научил юзеров этому слову.
ну да, для нас блондинок(без обид, если кто примет на свой счет), которые за 16 лет так и не научились говорить по русски, тьфу, по 1С!
"Все очень просто либо поместите ваш запрос в консоль запросов и вы увидите что все поля которые он выведет будут пустые но есть одна строка, что и показал Excel либо. Измените Вашу обработку вот таким образом:<br> Перем Диалог Экспорт;<br> Процедура КнопкаВыполнитьНажатие() Экспорт;<br> КнопкаВыполнить();<br> КонецПроцедуры<br>Функция КнопкаВыполнить() Экспорт;<br>НачПериода='2011.01.01'; <br>КонПериода='2011.12.31'; <br> //Запрос <br>ЗапросОС = Новый Запрос; <br>ЗапросОС.Текст = ("ВЫБРАТЬ <br>| ХозрасчетныйОбороты.СуммаОборотДт, <br>| ХозрасчетныйОбороты.СуммаОборотКт <br>|ИЗ <br>| РегистрБухгалтерии.Хозрасчетный.Обороты(&НачПериода, &КонПериода,, Счет = &Счет, , , , ) КАК ХозрасчетныйОбороты");<br>ЗапросОС.УстановитьПараметр("НачПериода", НачПериода); <br>ЗапросОС.УстановитьПараметр("КонПериода", КонПериода); <br>ЗапросОС.УстановитьПараметр("Счет", ЭтаФорма.ПланСчет);<br> <br>РезультатЗапроса = ЗапросОС.Выполнить();<br>ВыборкаИтоги=РезультатЗапроса.Выгрузить();<br>КоличествоЗаписей = ВыборкаИтоги.Количество(); <br> //Выгрузка <br>ИмяФайла=(Диалог.ПолноеИмяФайла); //Путь- поле содержащие путь к файлу<br> Excel= Новый COMОбъект("Excel.Application");<br> Excel.WorkBooks.Open(ИмяФайла);<br> Excel.Sheets(1).Cells(1,1).Value=ВыборкаИтоги[0].СуммаОборотДт; // возвращает 0<br> Excel.Sheets(1).Cells(1,2).Value=ВыборкаИтоги[0].СуммаОборотКт; // возвращает 0 <br> Excel.Sheets(1).Cells(1,3).Value=КоличествоЗаписей; // возвращает 1<br> Excel.Visible= Истина;<br>КонецФункции <br>Функция ВыбратьФайл(Маска="""") Экспорт <br> <br> Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);<br> Диалог.Заголовок = "Выберите файл для загрузки";<br> Диалог.ПолноеИмяФайла = """";<br> Диалог.Фильтр = "Файлы "+Маска+"|*."+Маска;;<br> <br> Диалог.ПредварительныйПросмотр = Истина;<br> <br> Если Диалог.Выбрать() Тогда<br> Возврат Диалог.ПолноеИмяФайла;<br> Иначе<br> Возврат """";<br> КонецЕсли;<br> <br> КонецФункции<br> Процедура ВыбратьФайлКом(Команда) Экспорт<br> <br> ИмяФайла = ВыбратьФайл("xls*");<br> Если СокрЛП(ИмяФайла)="""" Тогда<br> Возврат; <br> КонецЕсли;<br> <br> КонецПроцедуры<br> <br>Соответственно добавив реквизит на форму с видом ссылки на план счетов. И выбрав счет вы увидите что по данному счету нулевые цифры. А вот если выбрать суб счет 01.01 тогда результаты действительно есть)))"
Добрый день! Может научите как выгружать в excel, тех кто не знает. Но не за бесплатно конечно.
Что именно научить?
Что именно и откуда выгружать?