Страницы: 1
RSS
Объединение разных файлов excel в один
 
Добрый день.
Кто может подсказать в чем ошибка в макросе. Ругается на строку iLastRowBaza = BazaSht.Cells(Rows.Count, 3).End(xlUp).Row.
Задача:  Собрать несколько файлов эксель в один , файлы все одинаковые с одной шапкой.
Спасибо
Изменено: mekong174 - 14.04.2015 08:43:44
 
Доброе время суток
Скорее всего на это
Код
Rows.Count

Какого листа какой книги? Вы собираете в старый формат там всего 65000 строк, а в новом формате (а открываете книги в формате 2007) 1000000.
Так что замените на
Код
iLastRowBaza = BazaSht.Cells(BazaSht.Rows.Count, 3).End(xlUp).Row

Успехов.
 
Спасибо. Сейчас попробую
Страницы: 1
Наверх