18.04.2026

Работа с Microsoft Office и OpenOffice

Работа с Microsoft Office и OpenOffice

Процедура ВывестиСписокЭлементовСправочникаВWord() спр1=создатьобъект("справочник.сотрудники"); спр1.ИспользоватьДату(ТекущаяДата()); Сообщить( спр1.НайтиПоНаименованию("Администрация",0,1)); Сообщить(спр1.ПолучитьАтрибут("Наименование")); сотр=создатьобъект("справочник.сотрудники"); сотр.ИспользоватьДату(ТекущаяДата()); сотр.ИспользоватьРодителя(спр1); отчет=создатьобъект("word.application"); отчет.visible = 1; отчет.documents.add("d:\spisok.dot"); отчет.documents(1).tables(1).cell(1,2).range.text= спр1.ПолучитьАтрибут("Наименование");...