Чтоб два раза не вставать.

Есть код:

Word = Новый COMОбъект("Word.Application");
ПутьКФайлу = Элемент.Заголовок;
Документ = Word.Documents.Open(ПутьКФайлу);    
Word.Visible = Истина;

Как сделать так, чтоб Word открылся поверх 1С?

как IE выгнать на передний план ?

(1) Там еще толком ничего не придумали

все уже давно придумано

так пойдет ? (есть способ чиста адинес)


//*******************************************
Процедура Сформировать()
   Перем Имя,Путь;;
   Если ФС.ВыбратьФайл(0,Имя,Путь,"Открыть...","Ворд |*.doc;*.rtf;*.docx","DOC")=0 Тогда
       Возврат;
   КонецЕсли;
   Ворд = СоздатьОбъект("Word.Application");
   ПутьКФайлу = Путь+Имя;
   Документы = Ворд.Documents;
   Док = Документы.Open(ПутьКФайлу);
   Шел = СоздатьОбъект("Shell.Application");
   Шел.MinimizeAll();
   Ворд.Visible = -1;
   Окна = Док.Windows;
   Для Сч=1 По Окна.Count Цикл
       Окно = Окна.Item(Сч);
       Окно.WindowState = 1;
   КонецЦикла;
   Ворд.Activate();
КонецПроцедуры