---

&НаКлиенте
Процедура Импортировать(Команда)

    Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
    Диалог.Заголовок = "Выберите файл Excel";
    Диалог.Фильтр = "Файлы Excel (*.xlsx)|*.xlsx";

    Оповещение = Новый ОписаниеОповещения(
        "ПослеВыбораФайла",
        ЭтотОбъект
    );

    Диалог.Показать(Оповещение);

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


&НаКлиенте
Процедура ПослеВыбораФайла(ВыбранныеФайлы, ДополнительныеПараметры) Экспорт

    Если ВыбранныеФайлы = Неопределено Тогда
        Возврат;
    КонецЕсли;

    Если ВыбранныеФайлы.Количество() = 0 Тогда
        Возврат;
    КонецЕсли;

    ПутьКФайлу = ВыбранныеФайлы[0];

    Оповещение = Новый ОписаниеОповещения(
        "ПослеПомещенияФайла",
        ЭтотОбъект
    );

    НачатьПомещениеФайла(
        Оповещение,
        ,
        ПутьКФайлу,
        Ложь
    );

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