Макрос для Excel

Капибара, привет!

Пост посвящается всем моим любимым офисным жокеям, проводящих большую часть времени в Excel за инвойсами, таблицами с кучей цифр и т.д., где надо много считать и выносить.

Для примера возьмём данную таблицу:

Предположим, вам нужно сумму ячеек в столбце «Стоимость» вынести в другую программу. При выделении диапазона сумма отображается в нижнем правом углу Excel…

…которую нельзя скопировать.

Чтобы не вводить эти данные вручную, был написан код для оперативной выгрузки данных (код в комментариях). Но сначала нужно провести с программой пару манипуляций. Перейдём к списку действий:

1.   Создаём сам макрос и сохраняем в формате .xlsm

Открываем новый файл Excel, зажимаем Alt+F11, верхняя панель – Insert, выбираем Module. Вставляем код, закрываем окно макросов.

Файл сохраняем как «Книга с поддержкой макросов».

Теперь нужно назначить горячую клавишу. Зажимаем Alt+F8, имя макроса – Summation, в «Параметры» установите желаемую связку.

Внимание! Указанная буква будет работать только в своей раскладке клавиатуры (поэтому можно поставить цифру). У меня это «й», поставил для удобства, и ни на какие другие комбинации не ссылается.

Сохраняем. Если где-то будет спрашивать про включение макросов, соглашайтесь.

Готово! Выделяете диапазон, далее Ctrl+й, потом вставляете в любое место из буфера.

НО! Макрос работает только пока открыта книга со вставленным кодом. Далее будет вариант занесения в глобальные шаблоны Excel.

2.   Сохраняем тот же файл, но уже как надстройку в формате .xlam

Затем открываем любую книгу Excel под рукой, наверху Файл, внизу Параметры, Надстройки, Перейти.

Открывается окно, по Обзору ищем только что сохранённую надстройку. Готово! Напротив новой строчки ставим галку – и в путь, можно приступать к работе. Файл надстройки удалять/переносить нельзя: Excel ссылается на его путь.

Работоспособность проверена на всех современных версиях.