Читаю количество сток на странице
КолСтрок = НашФайл.Sheets.Item(ИмяЛиста).UsedRange.Rows.Count();

Выдает 5 - а строк то 6!!!!!
Кто в теме - что за шняга?

ошибся значит

а в самом экселе vba сколько выдает?

(1)нет! в файле 6 строк! Проверено!

да прибудут с вами корявые руки ибо читать таким макаром уже не модно

(4)а как - просвятите о новых направлениях!

методом эвристического анализа надо..

кто может без флуда реально сказать как определить точно количество строк в файле

(7) могут многие, но тебе помощь не светит

вариант 1 - посчитать кол-во непустых строк в цикле

и уверен что тот на том листе читаешь?

В начале листа есть совершенно пустые строки?

для  сч=1 по 99999

если счПодрядПпустыхСтрок>10 Тогда Прервать;

я не заморачиваюсь вообще, юзер вводит загрузить строки с .. и по.. че мудрить

(13) можно вообще не грузить, пусть распечатывает и ручками забивает

(14) в моем случае иначе никак, формат файлов для загрузки сумашедший

давайте напрягем мозг, хоть это и сложно, и спросим ТС зачем ему кол-во строк?

iRow = ActiveSheet.UsedRange.Row + ActiveSheet.UsedRange.Rows.Count - 1

пусть сам скажет, напрягаться еще..

(8)ты просто долбак, как в нашем городе говорят.  И твои посты подтверждают - нифига не умеешь крому флуда.

(19) Если в книге будет объединение ячеек - твой метод ошибется 100%. Надежнее всего - перебирать по строкам, и останавливаться когда пошли пустые

(16)загрузка данных из файла произвольного формата

(20) ну я сразу предлагал - (6)

(20)да уже думал об этом

(20) окей.. гденить в середине пустая строка.. че делать будем?

(24) цикл от 1 до 65536

(25) каждый раз читать 65 тыщ строк? а ты знаешь что там может и лям строк быть?

(26) это была шутка :)

Решил так. Кому может интересно - в инете нарыл
Лист = НашФайл.Sheets.Item(ИмяЛиста);
КолСтрок = Лист.Cells(1,1).SpecialCells(11).Row;

ActiveCell.SpecialCells(xlLastCell).Row

(28) на счет этого метода пишут:

КолС=Лист.UsedRange.SpecialCells(11).Row;
Действительно не надежно! Пример: таблица из 8 строк, но если кто-нибудь из юзверей просто ткнется на любую ячейку скажем в 300 строке, то количество строк опять будет 65 тык с гаком.
По своему опыту согласен с Херрес "Единственный надёжный способ - бежать по ячейкам и эмпирически искать пустое место", правда ющу не пустое место определунный символ или набор в первой ячейке последненей строки.

Данный метод не требует указания номера столбца и возвращает максимальную последнюю ячейку(строку — Row либо столбец — Column). Но используя данный метод следует помнить, что не всегда можно получить реальную последнюю заполненную ячейку. Если Вы где-то ниже занесете данные и сразу удалите их из таблицы, а затем примените такой метод, то lLastRow будет равна значению строки, из которой Вы только что удалили значения. Другими словами требует обязательного обновления данных, а этого можно добиться только сохранив и закрыв документ и открыв его снова. Так же, если какая-либо ячейка содержит форматирование(например, заливку), но не содержит никаких значений, то она тоже будет засчитана.

(30)протестил на 8 зашоренных-косячных файлах Экселя. Работает так:
КолСтрок1 = НашФайл.Sheets.Item(ИмяЛиста).UsedRange.Rows.Count();// Количество строк
КолСтрок2 = Лист.Cells(1,1).SpecialCells(11).Row;// Количество строк - вариант 2
КолСтрок =  Макс(КолСтрок1, КолСтрок2);// Берем тот что больше

(24) Я обычно читаю в ТЗ, потому если попалась пустая строка - то продолжаю считывать.. Если 10 подряд пустых строк - то значит конец данных. Пустые строки из ТЗ удаляю.

(33) тоже вариант - мучительно выбираю между ним и (32)

(34) Ты смотри по возможным последствиям. Самое страшное - если кто-то в строке 64001 поставит крестик. Что тогда будет? Если анализ того, что загрузилось?

(32) спс, учту)

(35) пересохранить в csv

обсуждалось уже
неоднократно

v8: Загрузка из Excel: неправильно видит количество строчек в файле

(38) тут собственно все уже обсуждали