Всем привет! Сделал Обработку по загрузке данных из Excel-я в документ "План Продаж". Установил поиск по наименованию Справочник "Пользователи", но почему-то он не присваивает, в чем причина?

```1c
    Для НомерЛиста = 1 По КоличествоЛистов Цикл

    //создание Плана Продаж

    ДокПланПродаж = Документы.ПланПродаж.СоздатьДокумент();
    ДокПланПродаж.Дата = Дата; //установка даты документа
    ДокПланПродаж.Сценарий = Сценарий;
    ДокПланПродаж.ДатаПланирования = Дата('20160101');
    ДокПланПродаж.ПериодичностьДетализации = Перечисления.Периодичность.Месяц;

    //Выбор Диапазона Страниц
    ТекСтраница = WorkBook.Sheets(НомерЛиста);
    Диапазон = ТекСтраница.UsedRange;
    ТекущийДиапазон = Диапазон.CurrentRegion;
    КоличествоСтрок = Диапазон.Rows.Count;
    КоличествоСтолбцов = Диапазон.Columns.Count;

    Ответственный = СокрЛП(ТекущийДиапазон.Cells(1,1).Value);
    НайтиОтветственного = Справочники.Пользователи.НайтиПоНаименованию(Ответственный);

    Если не ЗначениеЗаполнено(НайтиОтветственного) Тогда
    Сообщить("В документе не выбран ответственный, считанный с листа "+ Ответственный +". Выбирете ответственного, либо создайте нового.");
    Иначе
    // Установка Ответственного, не присваивает значение!!!
    ДокПланПродаж.Ответственный = НайтиОтветственного;
    КонецЕсли;
```

В чем может быть причина?
---
кстати - код Пользователя является Наименованием в 1С.
---
1. Почему документ не записываете?
2. А пользователя он точно находит?
3. И если да, это тот самый пользователь который нужен?
---
Вот весь код

```1c
    Процедура ЗагрузитьПланыПродаж()

    Excel = Новый COMОбъект("Excel.Application"); //создание сом объекта
    WorkBook = Excel.WorkBooks.Open(Файл,,); // открытие док
    КоличествоЛистов = WorkBook.Sheets.Count;
    СпрКласс = Справочники.Номенклатура;
    Сценарий = Справочники.СценарииПланирования.НайтиПоНаименованию("Оптимистичный");

    Для НомерЛиста = 1 По КоличествоЛистов Цикл
    //настроить чтобы брал по листу

    ДокПланПродаж = Документы.ПланПродаж.СоздатьДокумент();
    ДокПланПродаж.Дата = Дата; //установка даты документа
    ДокПланПродаж.Сценарий = Сценарий;
    ДокПланПродаж.ДатаПланирования = Дата('20160101');
    ДокПланПродаж.ПериодичностьДетализации = Перечисления.Периодичность.Месяц;

    //Выбор Диапазона Страниц
    ТекСтраница = WorkBook.Sheets(НомерЛиста);
    Диапазон = ТекСтраница.UsedRange;
    ТекущийДиапазон = Диапазон.CurrentRegion;
    КоличествоСтрок = Диапазон.Rows.Count;
    КоличествоСтолбцов = Диапазон.Columns.Count;

    Ответственный = СокрЛП(ТекущийДиапазон.Cells(1,1).Value);
    НайтиОтветственного = Справочники.Пользователи.НайтиПоНаименованию(Ответственный);

    Если не ЗначениеЗаполнено(НайтиОтветственного) Тогда
    Сообщить("В документе не выбран ответственный, считанный с листа "+ Ответственный +". Выбирете ответственного, либо создайте нового.");
    Иначе
    // Установка Ответственного
    ДокПланПродаж.Ответственный = НайтиОтветственного;
    КонецЕсли;

    Для Инд=4 По КоличествоСтрок Цикл

    Артикул = СокрЛП(ТекущийДиапазон.Cells(Инд,1).text);
    НайденныйЭлемент = НайтиПоАртиклу(Артикул);
    СчетПер = 1;

    Для Сч=4 По КоличествоСтолбцов Цикл

    Месяц = Дата(Год(ТекущаяДата()),СчетПер,1);

    Номенклатура = НайденныйЭлемент;
    КоличествоНоменклатуры = СокрЛП(ТекущийДиапазон.Cells(Инд,Сч).Value);
    КоличествоСтрокой = СтрЗаменить(КоличествоНоменклатуры," ", ");
    ОкргленКоличество = Окр(КоличествоСтрокой,3);
    Количество = Число(ОкргленКоличество);

    Если НайденныйЭлемент<>Справочники.Номенклатура.ПустаяСсылка() Тогда
    ДобавитьСтроку = ДокПланПродаж.СоставПлана.Добавить();
    ДобавитьСтроку.Количество = КоличествоНоменклатуры;
    //ДобавитьСтроку.ХарактеристикаНоменклатуры = НайденныйЭлемент.ОсновнаяХарактеристика;
    ДобавитьСтроку.ЕдиницаИзмерения = НайденныйЭлемент.ЕдиницаХраненияОстатков ;
    Если Количество>0 Тогда
    ДобавитьСтроку.Номенклатура = Номенклатура;
    ДобавитьСтроку.Период = Месяц;
    КонецЕсли;
    ДобавитьСтроку.СтавкаНДС = Справочники.СтавкиНДС.НайтиПоНаименованию("12% НДС");
    КонецЕсли;
    СчетПер = СчетПер+1;

    КонецЦикла;

    КонецЦикла;
    //ДокПланПродаж.Записать();
    ДокПланПродаж.ПолучитьФорму().Открыть();
    КонецЦикла;

    КонецПроцедуры
```

При отладке, в переменную "НайтиОтветственного" попадает нужная СправочникСсылка.Пользователи, то бишь находит по наименованию, но в Форме не устанавливает...
---
Смотреть какой код выполняется в ПередОткрытием(), ПриОткрытии() в форме документа.
Формы обычные?
---
alljoke, Формы обычные. Ок, Спасибо нашел, В обработчике событий ПередОткрытием(), установка Текущего пользователя в поле Ответственный.
---
кстати - код Пользователя является Наименованием в 1С.