Выгрузка данных по зарплатному проекту для ЗАО "КРЕДИТ ЕВРОПА БАНК" в Excel (для 1С 8.2 HRM)

03.10.12

Интеграция - Загрузка и выгрузка в Excel

Внешняя обработка: Выгрузка данных по зарплатному проекту для ЗАО "КРЕДИТ ЕВРОПА БАНК" с созданием файла Excel в 1С 8.2 HRM

Скачать файлы

Наименование Файл Версия Размер
Внешняя обработка: Выгрузка данных по ЗП для ЗАО "КРЕДИТ ЕВРОПА БАНК" резедент в D:\_ВЕДОМОСТЬ Рез.xls
.epf 28,46Kb
107
.epf 28,46Kb 107 Скачать
Новая для Кредит Европа Банк
.rar 35,64Kb
38
.rar 35,64Kb 38 Скачать
Внешняя обработка: Выгрузка данных по ЗП для ЗАО "КРЕДИТ ЕВРОПА БАНК" не резедент в D:\_ВЕДОМОСТЬ_Нерез
.epf 28,02Kb
14
.epf 28,02Kb 14 Скачать
Вариант2
.rar 49,77Kb
19
.rar 49,77Kb 19 Скачать

Новая внешняя обработка выгрузки по зарплатному проекту для ЗАО "Кредит Европа Банк"

В Процедуре КнопкаВыполнитьНажатие(Кнопка) надо изменить

// здесь надо поставить свой путь к шаблону
    Книга = Excell.WorkBooks.Open("C:\1C\SALARY.xlsm");

    // здесь надо поставить ваши коды для организации    
    Если Организация.Код = "000000078" Тогда
        КлиентНом = "765";
    ИначеЕсли Организация.Код = "000000032" Тогда
        КлиентНом = "3TS";
    ИначеЕсли Организация.Код = "000000099" Тогда    
        КлиентНом = "0RX";
    КонецЕсли;   

Процедура ПриОткрытии()
    //куда выгружаем по умолчанию
    Элементыформы.Файл.Значение = "D:\base1C\Ведомость.xlsm";
КонецПроцедуры

 

Вариант 2 (внешний шаблон)

Процедура КнопкаВыполнитьНажатие(Кнопка)
    Попытка
        Excell = Новый COMОбъект("Excel.Application");
    Исключение
        Сообщить(ОписаниеОшибки() + " Программа Exсel не установлена на данном компьютере!");
        Возврат;
    КонецПопытки;
    Книга = Excell.WorkBooks.Open("C:\maket_nerezedent.xls"); //******здесь необходимо указать путь к шаблону
.....

***************

Ключевые моменты:

Макет = ПолучитьМакет("Макет");   

Книга = Макет.Получить();

Лист = Книга.WorkSheets(1);                          // Установка листа в качестве рабочего с номером 1.

Лист.Cells(1,1).Value = "1234567";

Книга.Windows(1).Visible = 1;                        //без строчки ниже при использовании метода SaveAs
                                                     //документ создается c закрытым листом (в данном случае лист 1)

Лист.Rows("15:15").Insert(1);                        //добавить строку 15

Лист.Rows(Строка(17) + ":" + Строка(17)).Delete(1);  //удалить строку 17


Попытка
    Книга.SaveAs("D:\111.xls",56);                   //(,56)сохраняется с параметром XlExcel8 (Microsoft Office 97-2003)
Исключение
    Сообщить(ОписаниеОшибки()+" Файл не сохранен!");
КонецПопытки;

 

 

1)В создание пригодилась информация с http://forum.infostart.ru/forum24/topic40980/


2)Часто используемые методы для чтения/установки значений в Excel.

Эксель = СоздатьОбъект("Excel.Application");

 

Получение доступа к приложению Excel.

Эксель.Visible = Видимость;

 

0 - Excel не виден, 1 - виден.

Книга = Эксель.WorkBooks.Add();

 

Создание новой книги (файла) Excel.

Книга.SaveAs(ИмяФайла);

 

Сохранение книги Excel.

Лист = Книга.WorkSheets.Add();

 

Добавление нового листа в книгу.

Книга = Эксель.WorkBooks.Open(ИмяФайла);

 

Открытие существующей книги (файла) Excel.

Лист = Книга.WorkSheets(НомерЛиста);

 

Установка листа в качестве рабочего с номером НомерЛиста.

Лист.Name = ИмяЛиста;

 

Задание рабочему листу имени ИмяЛиста

Лист.PageSetup.Zoom = Масштаб;

 

Задание параметра страницы "Масштаб" (от 10 до 400).

Лист.PageSetup.Orientation = Ориентация;

 

Ориентация: 1 - книжная, 2 - альбомная.

Лист.PageSetup.LeftMargin = Эксель.CentimetersToPoints(Сантиметры);

 

Задание левой границы (в сантиметрах).

Лист.PageSetup.TopMargin =

Эксель.CentimetersToPoints(Сантиметры);

 

Задание верхней границы (в сантиметрах).

Лист.PageSetup.RightMargin =

Эксель.CentimetersToPoints(Сантиметры);

 

Задание правой границы (в сантиметрах).

Лист.PageSetup.BottomMargin =

Эксель.CentimetersToPoints(Сантиметры);

 

Задание нижней границы (в сантиметрах).

Лист.Columns(НомерКолонки).ColumnWidth = Ширина;

 

Задание ширины колонке.

Лист.Cells(НомерСтроки,НомерКолонки).Value = Значение;

 

Ввод данных в ячейку.

Лист.Cells(НомерСтроки,НомерКолонки).Font.Name = ИмяШрифта;

 

Установка шрифта в ячейке.

Лист.Cells(НомерСтроки,НомерКолонки).Font.Size = РазмерШрифта;

 

Установка размера шрифта в ячейке.

Лист.Cells(НомерСтроки,НомерКолонки).Font.Bold = Жирный;

 

1 - жирный шрифт, 0 - нормальный.

Лист.Cells(НомерСтроки,НомерКолонки).Font.Italic = Курсив;

 

1 - наклонный шрифт, 0 - нормальный.

Лист.Cells(НомерСтроки,НомерКолонки).Font.Underline =

Подчеркнутый;

 

2 - подчеркнутый, 1 - нет.

Лист.Cells(НомерСтроки, НомерКолонки).NumberFormat =

Формат;

 

Установка формата данных ячейки.

Лист.Cells(НомерСтроки,НомерКолонки).Borders.Linestyle =

ТипЛинии;

 

Установка рамок ячейки. 1 - тонкая сплошная.

См. также

SALE! 10%

Загрузка номенклатуры из Excel в УТ11, КА 2, ERP 2, Розница 2. Дополнительные реквизиты и сведения, характеристики, картинки, цены, остатки

Загрузка и выгрузка в Excel Розничная торговля Логистика, склад и ТМЦ Ценообразование, анализ цен Прайсы Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Розница 2 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Управленческий учет Платные (руб)

Загрузка из файлов xls, xlsx, ods, csv, mxl в УТ11, КА 2, ERP 2, Розница 2. Задействованы все возможности конфигурации - заполнение реквизитов номенклатуры, дополнительных реквизитов и сведений, характеристики, доп.реквизиты и сведения характеристик. Дополнительные обработки для расширения возможностей.

10560 9504 руб.

29.10.2014    210185    620    524    

439

Загрузка номенклатуры c картинками (несколько потоков одновременно) и сопутствующими данными в базу и любые документы из yml, xls, xlsx, xlsm, ods, ots, csv для УТ 10.3, УТ 11 (все), БП 3, КА 2, ERP 2, УНФ 1.6/3.0, Розница 2

Загрузка и выгрузка в Excel Логистика, склад и ТМЦ Ценообразование, анализ цен Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Платные (руб)

Эволюция не стоит на месте - новая удобная версия функциональной обработки для Вашего бизнеса! Что же Вы получаете? Удобный и интуитивно понятный интерфейс с 3-мя этапами работы. 2 режима - автоматический и ручной. Чтение XLSX, XLSM, CSV, XML/YML форматов без офиса, на любом сервере! Визуальное связывание колонок файла и реквизитов простым перетаскиванием колонок. Создание или обновление номенклатуры с иерархией, характеристик, доп. реквизитов, упаковок, загрузка практически неограниченного количества картинок на одну номенклатуру (с возможностью загрузки в несколько потоков одновременно), с хранением в томах или в базе. Загрузка номенклатуры поставщиков или поиск по их данным номенклатуры. Загрузка доп. реквизитов в характеристики. Загрузка штрихкодов с генерацией новых. Создание элементов справочников и ПВХ "на лету" для выбранных реквизитов. (Обновление от 11.12.2023, версия 9.5 - 9.9)

13200 руб.

20.11.2015    150727    367    375    

501

Маркетплейсный загрузчик для 12-ти маркетплейсов в "БП 3", "УТ 11", "КА 2", ERP, УНФ

Загрузка и выгрузка в Excel Маркетплейсы Платформа 1С v8.3 Бухгалтерский учет 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет Управленческий учет Платные (руб)

Реальный помощник, с помощью которого Вы сделаете необходимые документы для Wildberries, OZON, ЯндексМаркет, Мегамаркет, Aliexpress, "Детский мир", Казань-Экспресс, "Леруа Мерлен", ЭНФАНТА (Акушерство), ЛаМода, Летуаль, "Твой дом" в документы "Отчет комиссионера (агента) о продажах" и другие, может работать в "Бухгалтерия 3", "Бухгалтерия 3 КОРП", УТ 11, УНФ, КА 2, ERP. Возможность подключить любые маркетплейсы. Анализ продаж ОЗОН. 30 дней БЕСПЛАТНОГО пользования!

1800 руб.

12.08.2021    31897    226    63    

117

SALE! 20%

Загрузка документов и номенклатуры из Excel в 1С "одним нажатием": УПД, ТОРГ-12, отчеты маркетплейсов, заказы, счета, прайсы

Загрузка и выгрузка в Excel Оптовая торговля Платформа 1С v8.3 Управляемые формы Платформа 1C v8.2 Конфигурации 1cv8 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Универсальная обработка для загрузки документов из Excel в 1С. Не требует указания параметров (номера колонок, номер первой строки таблицы и т.д.) и предварительной настройки. Просто выбираете файл Excel, документ 1С и нажимаете кнопку "Загрузить". Обработка сама находит таблицу в файле Excel, необходимые для загрузки данные в ней (номенклатура, количество, НДС, цена, сумма) и загружает ее в 1С. Вместе с номенклатурой может найти контрагента, номер и дату документа, штрих-коды, серии ГТД, страну и т.д. Распознает документы ЛЮБОЙ ФОРМЫ (УПД, ТОРГ-12, заказ, отчет комиссионера и т.д.). Не требует MS Office. Для поиска таблиц используются методы эвристического поиска. Загружает только то, что нужно, т.е. пропускает повторы шапки таблицы, заголовки, промежуточные итоги, подписи и т.д. Содержит модуль работы с электронной почтой и api-загрузчик отчетов о продажах маркетплейсов.

5000 4000 руб.

09.11.2016    214930    925    886    

939

Загрузка данных отчета о реализации товаров из Excel файла СберМегаМаркет

Загрузка и выгрузка в Excel Маркетплейсы Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Загрузка данных отчета о реализации товаров из сервиса СберМегаМаркет для конфигурации: Бухгалтерия предприятия, редакция 3.0; Управление торговлей, редакция 11 и Управление нашей фирмой, редакция 3.0 в документ "Отчет комиссионера (агента) о продажах".

4800 руб.

07.06.2022    15080    79    0    

60

SALE! 30%

Распознавание и загрузка сканов в 1С "одним нажатием": УПД, ТОРГ-12, накладные, счета, номенклатура, заказы и т.д.

Загрузка и выгрузка в Excel Документооборот и делопроизводство (СЭД) Учет документов Распознавание документов и образов Управляемые формы 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление холдингом 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Универсальная программа для распознавания ЛЮБЫХ СКАНОВ ИЛИ ФОТО ТОВАРНЫХ ДОКУМЕНТОВ в 1С. Не требует указания параметров и предварительной настройки. Просто выбираете файл (PDF, JPG, DOC, XLS, HTML и т.д.) выбираете документ 1С и нажимаете кнопку "Распознать и загрузить".

6000 5520 руб.

04.06.2019    101385    296    173    

312
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
0. 02RUSlan 63 09.11.11 18:28 Сейчас в теме
Внешняя обработка: Выгрузка данных по зарплатному проекту для ЗАО "КРЕДИТ ЕВРОПА БАНК" с созданием файла Excel в 1С 8.2 HRM

Перейти к публикации

1. Batman 165 09.11.11 18:28 Сейчас в теме
Спасибо за таблицу.
Но смущает расхождение между названием публикации и ее описанием
3. 02RUSlan 63 10.11.11 09:34 Сейчас в теме
(1) Batman, Тебе пригодилась Выгрузка данных по ЗП для ЗАО "КРЕДИТ ЕВРОПА БАНК"
или пример для создания макета Excel в 1С 8.2
4. Batman 165 10.11.11 10:14 Сейчас в теме
(3)
Мне понравилось то, что используемые выражения работы с MS Excel сведены в таблицу. Удобно держать под рукой.
Сама обработка - нет, не нужна
02RUSlan; +1 Ответить
5. гвость 10.11.11 11:37 Сейчас в теме
Довольно ценное замечание, по поводу использования в типе макета Active Document, Exel-евского документа.
Действительно, без использования, в данном случае Книга.Windows(1).Visible = 1, получим док с данными, но с закрытой книгой, а открыть её в редакторе не получиться. Многие на эти грабли наступают.
02RUSlan; +1 Ответить
24. Tapochki-tmn 43 13.10.15 14:35 Сейчас в теме
Может кому пригодится:

Установлен Office 2010.

Делал внешнюю печатную форму, использовал в качестве шаблона файл Excel подключив через шаблон Active documents.
Вроде все делал по инструкции, и в отладчике даже видел что найденная метка на листе заменяется нужным мне значением, но при сохранении файла на диск и при отображении на экране документ открывался пустым... т.е. без книги, без листов... хотя в моем шаблоне три листа.

Помогла эта статья, добавил строчку в конце

"Книга.Windows(1).Visible = 1; "

а при отображении на экране еще 4 строки в конце. Вот код рабочий для примера:

Функция Печать() Экспорт
	
	// получаем данные для печати
	Выборка = СформироватьЗапросДляПечатиТрудовогоДоговора().Выбрать();
	Выборка.Следующий();

	// получаем макет
	
	Попытка
		МакетШаблонаExcel = ПолучитьМакет("ТрудовойДоговорЭксель").Получить();
	Исключение
		#Если Клиент Тогда
			Сообщить("Не существует такого макета");
		#КонецЕсли	
	КонецПопытки;
	
	Лист = МакетШаблонаExcel.WorkSheets(1);

       // Поиск и замена маркеров

	Лист.Cells.Replace("[НомерДок]", Выборка.НомерДок);
	Лист.Cells.Replace("[ДатаДок]", Выборка.ДатаПриема);
	Лист.Cells.Replace("[Гражданин_СРТАНЫ]", Выборка.ГражданинСтраны);
	Лист.Cells.Replace("[ФИО_СОТРУДНИКА]", Выборка.ФИОРаботника);
	Лист.Cells.Replace("[НАИМЕНОВАНИЕ_ОТДЕЛА]", Выборка.Подразделение);
	Лист.Cells.Replace("[НАИМЕНОВАНИЕ_ДОЛЖНОСТИ]", Выборка.Должность);
	
	Лист.Cells.Replace("[ВИД_ЗАНЯТОСТИ]", Выборка.ВидЗанятости);
	Лист.Cells.Replace("[СРОК_ДЕЙСТВИЯ_ДОГОВОРА]", Выборка.СрокДействияДоговора);
	Лист.Cells.Replace("[ОКОНЧАНИЕ_ИСПЫТАТЕЛЬНОГО_СРОКА]", Выборка.ОкончаниеИспытательногоСрока);
	
	Лист.Cells.Replace("[ТАРИФНАЯ_СТАВКА_ЦИФРОЙ]", Выборка.ТарифнаяСтавка);
	Лист.Cells.Replace("[ТАРИФНАЯ_СТАВКА_ПРОПИСЬЮ]", ОбщегоНазначенияЗК.СформироватьСуммуПрописью(Выборка.ТарифнаяСтавка, Выборка.ВалютаТарифнойСтавки));
	
	Лист.Cells.Replace("[РАЙОННЫЙ_КОЭФ_ЦИФРОЙ]", Выборка.Показатель1);
	Лист.Cells.Replace("[ПАСПОРТ]", Выборка.ДокументВид);
	Лист.Cells.Replace("[СЕРИЯ]", Выборка.ДокументСерия);
	Лист.Cells.Replace("[НОМЕР]", Выборка.ДокументНомер);
	Лист.Cells.Replace("[ДАТА_ВЫДАЧИ_ПАСПОРТА]", Выборка.ДокументДатаВыдачи);
	Лист.Cells.Replace("[КЕМ_ВЫДАН_ПАСПОРТ]", Выборка.ДокументКемВыдан);
	Лист.Cells.Replace("[КОД_ПОДРАЗДЕЛЕНИЯ]", Выборка.ДокументКодПодразделения);
	Лист.Cells.Replace("[ДАТА_РЕГИСТРАЦИИ_ПО_МЕСТУ_ЖИТЕЛЬСТВА]", Выборка.ДатаРегистрацииПоМестуЖительства);
	
	Лист.Cells.Replace("[АДРЕС_РЕГИСТРАЦИИ]", Выборка.АдресРегистрации);
	Лист.Cells.Replace("[ИНН_ФИЗ_ЛИЦА]", Выборка.ИННФизЛица);
	Лист.Cells.Replace("[НОМЕР_ПФР_ФИЗ_ЛИЦА]", Выборка.СтраховойНомерПФРФизЛица);
	
	СведенияОбОрганизации     = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(СсылкаНаОбъект.ОбособленноеПодразделение, СсылкаНаОбъект.ДатаНачала);
	
	Лист.Cells.Replace("[ЮР_АДРЕС]", СведенияОбОрганизации.ЮридическийАдрес);
	Лист.Cells.Replace("[ФАКТ_АДРЕС]", СведенияОбОрганизации.ФактическийАдрес);
	Лист.Cells.Replace("[ТЕЛЕФОНЫ]", СведенияОбОрганизации.Телефоны);
	
	Лист.Cells.Replace("[ОГРН]", СсылкаНаОбъект.ОбособленноеПодразделение.ОГРН); 
	
	Лист.Cells.Replace("[ИНН]", СведенияОбОрганизации.ИНН);
	Лист.Cells.Replace("[КПП]", СведенияОбОрганизации.КПП);
	
	Лист.Cells.Replace("[РАСШИФРОВКА_ПОДПИСИ_РУКОВОДИТЕЛЯ]", Выборка.ФИОРуководителяСокр);
	
	 // - без строчки ниже при использовании метода SaveAs документ создается c закрытым листом (в данном случае лист 1)
	МакетШаблонаExcel.Windows(1).Visible = 1; 
	
	// Вывод документа
	//БЕЗ ЛЮБОЙ ИЗ ЭТИХ СТРОК НЕ РАБОТАЕТ
	
	МакетШаблонаExcel.Application.Visible = Истина;
	МакетШаблонаExcel.Application.WindowState = 2;  //минимизировать окно
	МакетШаблонаExcel.Application.WindowState = 1;  //максимизировать окно
	МакетШаблонаExcel.Activate();
		
КонецФункции
Показать
02RUSlan; +1 Ответить
2. gutentag 253 09.11.11 23:07 Сейчас в теме
так и хочется спросить, а почему сами банки(за малым исключением) не дают внешние обработки/отчеты для Зарп.проекта?
И особенно это показательно для Сбербанка
---
...глядя на скриншот, я понял, что никогда не захочу иметь дело с этим банком.
6. ZLENKO 398 19.03.12 20:25 Сейчас в теме
Написал вывод в шаблон в макете типа ActiveDocument и "обломался" - на экране то показывает Excel, а вот сохранить невозможно ни программно ни через меню Excel. Убил кучу времени и так и эдак пытался сохранить. А потом погуглил и понял что это у всех такая трабла... Вобщем переделал на сохранение в макете бинарных данных. ActiveDocument - "в топку".
7. ZLENKO 398 26.03.12 13:25 Сейчас в теме
На ActiveDocument обломы не закончились... В Excel 2003 поячеечный вывод более менее приемлемо по скорости работает, а в Excel 2007-2010 скорее не работает чем работает. "Пошарился" по инету - нашел достаточно много способов вывода данных в Excel, но большинство из них не позволяет использовать заранее заданный шаблон.
Остановился на варианте с буфером обмена. Создаем шаблон, создаем текстовое содержимое буфера обмена и имитируем действия пользователя (программно) Кантрэл-Цэ и Кантрэл-Вэ :-) Прайс на 9000 строк выводится секунд за 20 !
8. MrVesna 20 04.04.12 16:19 Сейчас в теме
А как сохранить данный excel-файл по определенному пути без его открытия? И как программно проверить, что он сохранился или нет?
9. Filipp_inf 18.04.12 21:55 Сейчас в теме
При попытке выполнить обработку появилось сообщение об ошибке:
"{Форма.Форма.Форма(110)}: Ошибка при вызове метода контекста (SaveAs): Произошла исключительная ситуация (Microsoft Office Excel): Метод SaveAs из класса Workbook завершен неверно Файл не сохранен!"
10. 02RUSlan 63 19.04.12 09:03 Сейчас в теме
(9) Филипп, при каком варианте? другой вариант пробовал?
11. пользователь 16.05.12 10:32
Сообщение было скрыто модератором.
...
12. ilonnaa 22.05.12 16:04 Сейчас в теме
Лист.Cells(НомерСтроки, НомерКолонки).NumberFormat = Формат;

А можно подробностей по этому методу, примеры его использования?
13. ilonnaa 22.05.12 16:50 Сейчас в теме
Лист.Cells(НомерСтроки, НомерКолонки).DataFormat = Формат;
так будет дата?
14. ilonnaa 22.05.12 17:39 Сейчас в теме
Всё ясно.

ДатаФормат = "ДД.ММ.ГГГГ";
Лист2.Cells(НомерСтроки,НомерКолонки).NumberFormat = ДатаФормат;
//принудительно ставим формат даты
02RUSlan; +1 Ответить
15. chmv 03.10.12 12:06 Сейчас в теме
У нас проблемма с банком ЕВРОПА-КРЕДИТ.
Не поняла т.к. в этом файле не работает макрос, зачем туда запихивать информацию.
М.б. я что-то не понимаю.
Мы пытаемся запихнуть все в csv
16. 02RUSlan 63 03.10.12 12:25 Сейчас в теме
(15) chmv, сейчас выложу свежую обработку для КЕБ
17. 02RUSlan 63 03.10.12 13:08 Сейчас в теме
(15) chmv, скачивайте новую обработку
18. chmv 03.10.12 17:32 Сейчас в теме
К сожалению не хватает ресурсов. Не могли бы прислать на chmv2005@mail.ru
19. 02RUSlan 63 03.10.12 17:51 Сейчас в теме
20. maxim305 18 23.11.12 08:27 Сейчас в теме
Спасибо, полезный материал.
21. elenko1 03.01.13 15:06 Сейчас в теме
Да, полезный код для работы с Excel, спасибо!
Хочу поделиться (добавить для пользы на будущее) еще одним приемом работой с Excel через 1с - программной установкой формул.
Только что экспериментальным методом нашла, как это сделать.
Например, нужно посчитать сумму в столбце 8 в той же строке из столбца 1+ столбца 2.
СтрокаСФормулой = "=RC[-7]+ RC[-6]";
Лист.Cells(НомерСтроки,НомерКолонки).Formula = СтрокаСФормулой.

Формулы писать исключительно на английском, русский не воспринимает почему-то...
Светлый ум; 02RUSlan; +2 Ответить
27. Светлый ум 406 11.12.15 12:40 Сейчас в теме
(21) воспользовался установкой формулы в ячейку:

// Получение итогов по колонке для двух строк:

СтрокаСФормулой = "=SUM(F13:F14)";
Лист.Cells(17,6).Formula = СтрокаСФормулой;


22. Alfer 16.01.14 19:29 Сейчас в теме
меня устраивает во всем - а некоторые моменты возьму на вооружение для дальнейшего использования
23. buval 65 03.02.15 16:57 Сейчас в теме
Спасибо, помогла информация и обсуждения
25. Светлый ум 406 09.12.15 12:48 Сейчас в теме
{Форма.Форма.Форма(124)}: Преобразование значения к типу Число не может быть выполнено
Лист.Cells(ии,3).Value = ФОРМАТ(Число(ВыборкаДетальныеЗаписи.НомерСчетаСотрудникаОрганизацииВБанке), "ЧГ=");
26. Светлый ум 406 09.12.15 13:28 Сейчас в теме
Поправил ручками:
- Выборка может быть и пустой, поэтому преобразование формата в попытку ставим.
Оставьте свое сообщение