Здравствуйте.
Задача: выделить и перенести на новую страничку все данные, ничего не пропустив. Для этого открываю файл с данными и начинаю запись макроса. После этого по шагам: устанавливаю курсор в ячейку "A1" > нажимаю "Ctrl + A" (чтобы выделить вся область с данными) > копирую выделенную область в буфер > создаю в этой же книге новую страничку > устанавливаю курсор в ячейку "A1" > вставляю данные > останавливаю запись.
После проверяю получившийся макрос:
Всё бы ничего, вот только Excel чётко определил и указал диапазон, а это очень плохо в моей задаче
Выходит, если в следующем файле записей будет больше, чем на 105 строк - он их просто не захватит. Как изменить код так, чтобы Excel, как говорится, немного "думал", т.е. интеллектуально определял диапазон с данными?
Надеюсь, это осуществимо, т.к. файлов нереально много и хотелось бы избавить себя от рутины, поэтому вся надежда на Вас
Заранее спасибо!
Задача: выделить и перенести на новую страничку все данные, ничего не пропустив. Для этого открываю файл с данными и начинаю запись макроса. После этого по шагам: устанавливаю курсор в ячейку "A1" > нажимаю "Ctrl + A" (чтобы выделить вся область с данными) > копирую выделенную область в буфер > создаю в этой же книге новую страничку > устанавливаю курсор в ячейку "A1" > вставляю данные > останавливаю запись.
После проверяю получившийся макрос:
| Код |
|---|
Range("A1:P105").Select
Selection.Copy
Sheets.Add After:=ActiveSheet
ActiveSheet.Paste |
Всё бы ничего, вот только Excel чётко определил и указал диапазон, а это очень плохо в моей задаче
Выходит, если в следующем файле записей будет больше, чем на 105 строк - он их просто не захватит. Как изменить код так, чтобы Excel, как говорится, немного "думал", т.е. интеллектуально определял диапазон с данными?
Надеюсь, это осуществимо, т.к. файлов нереально много и хотелось бы избавить себя от рутины, поэтому вся надежда на Вас
Заранее спасибо!
