Пример который использую я :
Окно = СоздатьОбъект("WORD.Application"); // WORD-ий файл
ИмяНовый = "ИМЯ.doc";

Для Сч=1 По (Окно.Documents.Count) Цикл
оДок = Окно.Documents.Item(Сч);
Если (оДок.Name = ИмяНовый) Тогда
Предупреждение("Файл:"+ ИмяНовый +" открыт ... ");
Открыт = 1;
Возврат;
КонецЕсли;
КонецЦикла;
Если (Открыт = 0) Тогда
оДок = Окно.Documents.Open(ПутьФ+"\"+ИмяФайла);
// это если нужно !!!!
СвойстваДок = оДок.BuiltinDocumentProperties;
СвойстваДок.Item("Author").Value = Строка(Автор); // автор
СвойстваДок.Item("Last Author").Value = Строка(Автор); // последниц автор
СвойстваДок.Item("Subject").Value = "Тема"; // тема
СвойстваДок.Item("Keywords").Value = "Ключевые слова"; // ключевые слова
СвойстваДок.Item("Comments").Value = "Создан из 1С"; // комментарий
СвойстваДок.Item("Company").Value = "компания"; // компания

оДок.SaveAs(ПутьФ+"\"+ИмяНовый);
КонецЕсли;

// это закладка определенная в файле шаблона
оДок.Bookmarks("НомерДок").Range.Text = СокрЛП(НомерДок);
оДок.Bookmarks("Продажа").Select();
Где = Окно.Selection;
// здесь вставляется текст на месте закладки
ДокументСтороны1 = " согласно договору № "+ СокрЛП(ТаблицаОснование.Основание)+ " : ";
Где.Text = ДокументСтороны1;
Где.EndOf(); Где.TypeParagraph();

// если в файлк шаблона определен тектс в {} то вместо него вставляется тест
Поиск = оДок.Content.Find; // это высь текст документа для поиска и замены
Поиск.Execute("{Сторона2}" ,,,,,,,,,""+СокрЛП(Контрагент.ПолнНаименование),2);
Поиск.Execute("{ИННСторона2}" ,,,,,,,,,""+СокрЛП(Контрагент.ИНН),2);
Поиск.Execute("{КППСторона2}" ,,,,,,,,,""+СокрЛП(Контрагент.КПП),2);
Поиск.Execute("{АдресСтороны2}",,,,,,,,,""+СокрЛП(Контрагент.ЮридическийАдрес),2);
Поиск.Execute("{РуководительСтороны2}",,,,,,,,,""+СокрЛП(РуководительСтороны2),2);
Поиск.Execute("{СуммаПо60}",,,,,,,,,""+СокрЛП(СуммаПо60),2);
Поиск.Execute("{СуммаПо62}",,,,,,,,,""+СокрЛП(СуммаПо62),2);
Поиск.Execute("{СуммаАкта}",,,,,,,,,""+СокрЛП(СуммаАкта),2);
Поиск.Execute("{ДатаДокПрописью}",,,,,,,,,""+СокрЛП(Формат(ДатаДок,"Д(0)ДДММММГГГГ")),2);
Поиск.Execute("{ДатаДок}",,,,,,,,,""+СокрЛП(ДатаДок),2);

оДок.Save();
Окно.Visible = 1;
оДок.Activate();
Если есть вопрсы задавайте.

robocip,
Нет, я взяла фрагмент из своей процедуры, для нее создается шаблон расположенный по адресу "ПутьФ+ИмяФайла", если вам не нужен шаблон, то строки проверки и открытия файла вам не нужны, а надо добавить "оДок = " создания нового документа

Попытка

Окно = СоздатьОбъект("WORD.Application"); // WORD-ий файл
оДок = Окно.Documents.Add();

СвойстваДок = оДок.BuiltinDocumentProperties;
СвойстваДок.Item("Author").Value = "Elena"; // автор
СвойстваДок.Item("Last Author").Value = "Elena"; // последниц автор

СвойстваДок.Item("Subject").Value = "создание документа"; // тема
СвойстваДок.Item("Keywords").Value = "Elena"; // ключевые слова
СвойстваДок.Item("Comments").Value = "Создан из 1С"; // комментарий
СвойстваДок.Item("Company").Value = "Пример создания файла из 1С"; // комментарий

Где = Окно.Selection;

Где.Text = "Пример текста";
Где.EndOf(); Где.TypeParagraph(); // новая строка

Окно.Visible = 1;
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
Это рабочий фрагмент процедуры. Лишнее я убрала. Проверьте.