0
kisobol
04.04.15
✎
02:50
|
&НаСервере
Процедура ЗаполнениеСправочника()
COMОбъект = ПолучитьCOMОбъект(ПутьКФайлу);
ЕКСЕЛЬНомерАнкеты = COMОбъект.Sheets(1).Cells(5,2).Value;
ЕКСЕЛЬФамилия = COMОбъект.Sheets(1).Cells(7,2).Value;
ЕКСЕЛЬИмя = COMОбъект.Sheets(1).Cells(9,2).Value;
ЕКСЕЛЬОтчество = COMОбъект.Sheets(1).Cells(10,2).Value;
СправочникОбъект = Справочники.Соотечественники.СоздатьЭлемент();
СправочникОбъект.ДатаПоступления = ДатаПоступления;
СправочникОбъект.НоменАнкеты = ЕКСЕЛЬНомерАнкеты;
СправочникОбъект.Фамилия = ЕКСЕЛЬФамилия;
СправочникОбъект.Имя = ЕКСЕЛЬИмя;
СправочникОбъект.Отчество = ЕКСЕЛЬОтчество;
СправочникОбъект.Наименование = СправочникОбъект.Фамилия + " "
+ СправочникОбъект.Имя + " " + СправочникОбъект.Отчество;
СправочникОбъект.Записать();
КонецПроцедуры
Есть вот такой код, при открытии xls копируем фиксированные ячейки в справочник.
Но как скопировать ячейки которые постоянно в разных местах, можно их найти только поиском(по названию соседней ячейки, всегда такое название)
Скриншот
|
|