Всем привет!

В Excel одну и ту же задачу можно решить несколькими способами.

например, задачу собрать несколько страниц в единую базу сейчас я бы решала через Power Query. Но как-то давно прописала макрос, который и показываю вам в видео ниже.



На всякий случай – сюда дублирую основные лайфхаки кода макроса, полностью код и принцип действия показываю в видео.



Application.ScreenUpdating = False ' отключить обновление экрана

Application.ScreenUpdating = True ' включить обновление экрана

ActiveCell.Offset(1, 0).Select ' перемещение вниз от выделенной ячейки

ActiveCell.Offset(-1, 0).Select ' перемещение вверх от выделенной ячейки

ActiveCell.Offset(0, 1).Select ' перемещение вправо от выделенной ячейки

ActiveCell.Offset(1, -1).Select ' перемещение влево от выделенной ячейки