Процедура ПриОткрытии()
        Попытка
                WSHShell = СоздатьОбъект("WScript.Shell");
                WSHShell.SendKeys("%");
                WSHShell.SendKeys("{LEFT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}");
        Исключение
      
    КонецПопытки;
КонецПроцедуры