Найдено 78 результатов

admin
19 мар 2020 11:31
Форум: Готовые листинги и решения
Тема: 1С СКД условное оформление программно при компоновке результата
Ответы: 0
Просмотры: 228

1С СКД условное оформление программно при компоновке результата

НастройкиОсновнойСхемы.УсловноеОформление.Элементы.Очистить(); УсловноеОфромлениеОтчета=НастройкиОсновнойСхемы.УсловноеОформление.Элементы.Добавить(); УсловноеОфромлениеОтчета.Использование=Истина; УсловноеОфромлениеОтчета.ИспользоватьВГруппировке=ИспользованиеУсловногоОформленияКомпоновкиДанных.Ис...
admin
02 мар 2020 00:52
Форум: Готовые листинги и решения
Тема: 1С выгрузить в Excel таблицу значений без установленного Excel
Ответы: 0
Просмотры: 313

1С выгрузить в Excel таблицу значений без установленного Excel

Запрос=Новый Запрос; Запрос.Текст="ВЫБРАТЬ | * |ИЗ | РегистрСведений.СкидкиНаценкиНоменклатуры.СрезПоследних КАК СкидкиНаценкиНоменклатурыСрезПоследних"; ТабЗнч = Запрос.Выполнить().Выгрузить(); ПострПечать = Новый ПостроительОтчета; ПострПечать.ИсточникДанных = Новый ОписаниеИсточникаДанных(ТабЗнч...
admin
28 фев 2020 03:12
Форум: Готовые листинги и решения
Тема: 1С прочитать Excel файл в таблицу значений без установленного Excel
Ответы: 0
Просмотры: 361

1С прочитать Excel файл в таблицу значений без установленного Excel

ТД=Новый ТабличныйДокумент; ТД.Прочитать(ИмяФайла,СпособЧтенияЗначенийТабличногоДокумента.Текст); ОбластьЯчеек = ТД.Область(1, 1, ТД.ВысотаТаблицы, ТД.ШиринаТаблицы); ИсточникДанных = Новый ОписаниеИсточникаДанных(ОбластьЯчеек); ПостроительОтчета = Новый ПостроительОтчета; ПостроительОтчета.Источни...
admin
06 янв 2020 18:15
Форум: Готовые листинги и решения
Тема: 1с правильный вывод табличного документа на печать
Ответы: 0
Просмотры: 927

1с правильный вывод табличного документа на печать

Если Не ОбщегоНазначенияКлиент.ПодсистемаСуществует("СтандартныеПодсистемы.Печать") Тогда Возврат; КонецЕсли; ИдентификаторПечатнойФормы = "СписокОшибокПриЗагрузкеExcel"; НазваниеПечатнойФормы = НСтр("ru = 'СписокОшибокПриЗагрузкеExcel'; |en = 'Cut card'"); МодульУправлениеПечатьюКлиент = ОбщегоНаз...
admin
06 янв 2020 18:11
Форум: Готовые листинги и решения
Тема: 1с чтение из Excel без его установки (Microsoft ADODB)
Ответы: 0
Просмотры: 964

1с чтение из Excel без его установки (Microsoft ADODB)

украденная функция из интернетов и допиленная под себя: // Метод "Microsoft ADODB"/ // // Параметры: // ФайлEXCEL - Полное имя файла (путь к файлу с именем файла и расширением). // ИмяЛиста - Имя выбранного листа файла EXCEL. // СтрокаЗаголовка (по умолчанию = 1) - Номер строки EXCEL, в которой расп...
admin
30 сен 2019 00:14
Форум: Windows
Тема: Анализ wifi сетей
Ответы: 0
Просмотры: 2088

Анализ wifi сетей

бесплатная утилита
https://insssider.com
admin
10 авг 2019 16:16
Форум: Наши услуги
Тема: Разработка, доработка и поддержка конфигураций на базе платформы 1С 8.х
Ответы: 1
Просмотры: 2870

Re: Разработка, доработка и поддержка конфигураций на базе платформы 1С 8.х

Увеличился персонал, работаем удаленно, для потенциально крупных проектов осуществляем выезд по Москве и МО.
Ставка 1700 руб\час
Так же готовы рассматривать проектную деятельность.
admin
09 авг 2019 14:33
Форум: Готовые листинги и решения
Тема: Получить уникальный идентификатор из "Объект не найден...."
Ответы: 0
Просмотры: 2254

Получить уникальный идентификатор из "Объект не найден...."

Функция ПолучитьGUIDпоОбъектНеНайден(ГУИДУдОбъкта) ГУИДУдОбъктаСтр = СтрЗаменить(ГУИДУдОбъкта,"<Объект не найден> (",""); ГУИДУдОбъктаСтр = СтрЗаменить(ГУИДУдОбъктаСтр,")",""); ГУИДУдОбъктаСтр = СтрЗаменить(ГУИДУдОбъктаСтр,"0x",""); ГУИДУдОбъктаСтр = Сред(ГУИДУдОбъктаСтр, Найти(ГУИДУдОбъктаСтр,":")...