Гружу таблицу из excel, случайно обнаружилась проблема.
При загрузке файлов со включенным автофильтром не грузятся некоторые строки. Вопрос: как программно определить, что в файле активен автофильтр?

(0) Думаю, дело не совсем в этом. Через ADO грузишь?

ExcelПриложение = Новый COMОбъект("Excel.Application");
Ex = ExcelПриложение.WorkBooks.Open(ИмяФайла);
ЛистЭксел = Ex.Sheets(1);
ВсегоСтрок = ЛистЭксел.Cells.SpecialCells(11).Row;
Для Счетчик = НомерПервойСтрокиТаблицы По ВсегоСтрок Цикл
НоменклатураНаименование = ЛистЭксел.Range("B"+Формат(Счетчик,"ЧГ=0")).Value;

и т.д.

(2) А что такое SpecialCells?

А, не. Если через аппликэйшн, тогда не то что я подумал.

ВсегоСтрок = ЛистЭксел.Cells.SpecialCells(11).Row;
Для Счетчик = НомерПервойСтрокиТаблицы По ВсегоСтрок Цикл
это уже не модно

(4) там явно видно, гружу без фильтра - все ок.
включаю автофильтр, даже вообще без отборов - получаю в загруженном документе меньше строк, притом, что цикл простейший. Причем пропускает строки по непонятному принципу, совсем не по фильтру.

Ексель     = Новый  COMОбъект("Excel.Application") ;
    ФайлЕксель = Ексель.Workbooks.Open(ПутьКФайлу);
    
    Для н = НомерСтрокиНачало По НомерСтрокиКонец Цикл
    сокрлп(Ексель.Sheets(Лист).Cells(н,1).Value);///переменная    

    конеццикла;
    Ексель.Application.Quit();


абсолютно рабочий код

Точнее вот так:

Ексель     = Новый  COMОбъект("Excel.Application") ;
    ФайлЕксель = Ексель.Workbooks.Open(ПутьКФайлу);
    
    Для н = НомерСтрокиНачало По НомерСтрокиКонец Цикл
    нн=сокрлп(Ексель.Sheets(Лист).Cells(н,1).Value);///переменная    

    конеццикла;
    Ексель.Application.Quit();

МассивДанных = РабочийЛист.UsedRange.Value.Выгрузить();


этот метод тоже фильтр включает?

(6) чудес не бывает
либо ЛистЭксел.Cells.SpecialCells(11).Row; возвращает меньше чем надо
либо у вас счетчик перескакивает

выведи счетчик на посмотреть - пропуски естьт?

хотя если без фильтра ок - то счетчик не причем

что значит "пропускает строки"?

а не кажется что автофильтр тут не причем? Он сделан для пользователей, при работе учитываются все строки,иначе не было бы гемороя со скрытыми строками и столбцами(из собственного опыта)

(6) Из собственного опыта: Excel должен быть закрыт, файлы - закрыты. Какая необходимость держать файл открытым?

+(13) Да еще и с фильтрацией.

Sheet.ShowAllData()

(2) specialcells невсегда подходит. Беги в цикле по строкам и проверяй заполнена ячейка в определенной колонке или нет

Пока не ПустаяСтрока(лист.cells(н, 1).text) Цикл

Сделал пустой цикл перебора строк с выводом счетчика, с фильтром 170 строк, без фильтра - 180. Попутно нашел нужное:
Если ЛистЭксел.AutoFilterMode() Тогда Нет!