v7: Фильтрация в ексель через AutoFilter по нескольким значениям

(0) На. Выдрал у себя. Напихал коментов по максимуму. Разберешься.
&НаКлиенте
Процедура ФильтроватьЭксельПоНесколькимЗначениям()

    Перем ExcelПриложение, РабочаяКнига, РабочийЛист, ДиапазонДляФильтра;

    // Укажите путь к вашему файлу Excel
    ПутьКФайлу = "C:\Temp\МойФайл.xlsx"; // <--- ИЗМЕНИТЕ НА ВАШ ПУТЬ

    // Укажите столбец для фильтрации (например, 1 для столбца A, 2 для B и т.д.)
    НомерСтолбцаДляФильтра = 1; // <--- ИЗМЕНИТЕ НА НУЖНЫЙ СТОЛБЕЦ

    // Укажите значения для фильтрации
    // Важно: значения должны быть строками, даже если в Excel это числа.
    // Для Excel это массив значений, которые должны быть показаны.
    МассивЗначенийДляФильтра = Новый Массив;
    МассивЗначенийДляФильтра.Добавить("Значение1"); // <--- ЗАМЕНИТЕ НА ВАШИ ЗНАЧЕНИЯ
    МассивЗначенийДляФильтра.Добавить("Значение2");
    МассивЗначенийДляФильтра.Добавить("ЕщеОдноЗначение");

    Попытка
        // Создаем COM-объект Excel
        ExcelПриложение = Новый COMОбъект("Excel.Application");
    Исключение
        Сообщить("Ошибка при создании COM-объекта Excel: " + ОписаниеОшибки());
        Возврат;
    КонецПопытки;

    ExcelПриложение.Visible = Истина; // Сделать Excel видимым (можно Истина или Ложь)
    ExcelПриложение.DisplayAlerts = Ложь; // Отключить предупреждения Excel

    Попытка
        // Открываем книгу Excel
        РабочаяКнига = ExcelПриложение.Workbooks.Open(ПутьКФайлу);
    Исключение
        Сообщить("Ошибка при открытии файла Excel: " + ОписаниеОшибки());
        ExcelПриложение.Quit(); // Закрыть Excel, если не удалось открыть книгу
        ExcelПриложение = Неопределено;
        Возврат;
    КонецПопытки;

    Попытка
        // Получаем первый лист (можно указать имя листа: РабочаяКнига.Sheets("ИмяЛиста"))
        РабочийЛист = РабочаяКнига.Worksheets(1);
        РабочийЛист.Activate(); // Активируем лист

        // Определяем используемый диапазон на листе
        // Если данные начинаются не с A1, нужно будет скорректировать
        ДиапазонДляФильтра = РабочийЛист.UsedRange;

        // Сначала проверяем, есть ли уже автофильтр, и если да, снимаем его
        Если РабочийЛист.AutoFilterMode Тогда
            РабочийЛист.AutoFilterMode = Ложь;
        КонецЕсли;

        // Включаем автофильтр для всего используемого диапазона
        ДиапазонДляФильтра.AutoFilter();

        // Фильтруем по заданному столбцу и массиву значений
        // xlFilterValues (константа = 7) используется для фильтрации по списку значений.
        // Operator:=7 означает xlFilterValues
        // Criteria1 должен быть массивом значений, которые нужно ОТОБРАЗИТЬ.
        // Для COM в 1С массив 1С должен быть преобразован в COM-совместимый массив.
        // Это происходит автоматически для простых типов данных.
        ДиапазонДляФильтра.AutoFilter(НомерСтолбцаДляФильтра, МассивЗначенийДляФильтра, 7); // 7 = xlFilterValues

        Сообщить("Автофильтр применен успешно!");

    Исключение
        Сообщить("Ошибка при работе с Excel: " + ОписаниеОшибки());
    КонецПопытки;

    // Важно: не закрывайте ExcelПриложение.Quit() сразу, если хотите, чтобы Excel остался открытым.
    // Если нужно закрыть Excel после выполнения:
    // Если НЕ ExcelПриложение.Visible Тогда // Закрывать только если Excel был невидимым
    // РабочаяКнига.Close(Ложь); // Закрыть книгу без сохранения изменений
    // ExcelПриложение.Quit();
    // КонецЕсли;

    // Освобождаем COM-объекты (рекомендуется, хотя сборщик мусора 1С должен справиться)
    РабочийЛист = Неопределено;
    РабочаяКнига = Неопределено;
    ExcelПриложение = Неопределено;

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