Excel works!

Иногда даже самые простые и удобные возможности программ малоизвестны пользователям. Недавно я увидел, как один сотрудник копирует данные с одного листа на другой обычными Ctrl + C, Ctrl + V. Я конечно обрадовался, что человек знает горячие клавиши, но сразу спросил, как он будет копировать несколько листов. Человек снова не растерялся и ответил, что «по-любому есть какой-то быстрый способ, раз ты спрашиваешь». Действительно, способ есть. Опишу как быстро скопировать лист Excel со всеми данными или как переместить лист или несколько листов в другую книгу, чтобы потом можно было делиться ссылкой на статьью.

Отмечу, ничего дурного, в том чтобы пользоваться копировать/вставить для дублирования листов нет.  Хотя вы можете скопировать таким образом не все данные, например, не все объекты. Знать другие удобные способы копирования и перемещения тоже будет полезно

Как быстро скопировать лист Excel со всеми данными?

Предположим у вас есть лист с данными. На ярлычке листа кликните правой кнопкой мыши и выберите Переместить или скопировать

В открывшемся диалоговом окне выберите то, что вам необходимо от программы

Отметив галочку Создать копию после нажатия ОК, вы получите копию листа в нужном месте, а в разделе перед листом как раз нужно выбрать это место.

Чтобы скопировать несколько листов, в начале перед нажатием правой кнопки мыши выберите нужные листы. Это можно сделать, зажав Ctrl и кликнув по каждому листу.

Если надо выделить все листы между разными листами, выберите 1 лист, зажмите Shift и выберите последний лист.

Как переместить лист в другую книгу?

Чтобы переместить лист в другую книгу, есть специальный раздел Переместить выбранные листы в книгу

Здесь можно выбрать действующую книгу, создать новый файл, так и переместить в другой открытый файл. Если нужна копия листа, не забудьте поставить галочку Создать копию.

Важно! Если вы перемещаете или копируете лист в другую книгу, то если на листе были формулы они не будет работать в новой книге, если закрыть изначальный файл.

Копирование листов при помощи VBA

Если надо скопировать лист в пределах рабочего файла, можно воспользоваться. Где имена листов такие же, как на их ярлыках

Worksheets("Лист1").Copy Before:=Worksheets("Лист2")
Worksheets("Лист1").Copy After:=Worksheets("Лист2")

Если надо копировать листы в другую книгу, то выглядеть это должно примерно так

Workbooks("Книга1.xlsm").Worksheets("Лист1").Copy _
After:=Workbooks("Книга2.xlsm").Worksheets("Лист1")

Перемещение листов выполняется похожее

Worksheets("Лист1").Move After:=Worksheets("Лист2")

Workbooks("Книга1.xlsm").Worksheets("Лист1").Move _
After:=Workbooks("Книга2.xlsm").Worksheets("Лист1")


Примерно так. Если остались вопросы, постараюсь ответить.