Магия таблиц. 100+ приемов ускорения работы в Excel (и немного в Google Таблицах) - Ренат Шагабутдинов Страница 57

И это пример задачи, которую можно решить только макросом, причем не записью макроса, а вручную, путем ввода кода. Потому что записать можно определенные действия, но алгоритм «создай ссылку на каждый лист в книге» невозможно записать: тут присутствуют цикл и неизвестное заранее число листов.

Хотя, как правило, большинству хватает встроенных инструментов и функций для решения рабочих задач (тем более когда есть Power Query), но иногда могут возникнуть задачи вроде такой, для которой придется писать (или искать в Сети, на форумах готовый) макрос.

Следующий код создает новый лист с именем «Оглавление» и добавляет в первом столбце ссылки на все остальные листы в книге.

Sub Оглавление()

Dim Contents As Worksheet

Set Contents = ActiveWorkbook.Worksheets.Add(before:=ActiveWorkbook.Worksheets(1))

Contents.Range("A1") = "Оглавление"

Contents.Name = "Оглавление"

For i = 2 To ActiveWorkbook.Worksheets.Count

Contents.Hyperlinks.Add Anchor:=Cells(i, 1), Address:="", SubAddress:="'" & ActiveWorkbook.Worksheets(i).Name & "'!A1", TextToDisplay:=ActiveWorkbook.Worksheets(i).Name

Next i

Contents.Columns(1).EntireColumn.AutoFit

End Sub

Его можно добавить в личную книгу макросов, чтобы он был доступен у вас во всех книгах Excel, а потом на панель быстрого доступа, чтобы оглавление создавалось по нажатию кнопки.

Личная книга — это книга, которая открывается в Excel всегда, она нужна, чтобы хранить те макросы, которые могут понадобиться вам в любой момент при работе с любой книгой, а не с отдельным файлом. Чтобы она у вас появилась, достаточно начать запись макроса (можно будет ее сразу закончить) и выбрать в списке «Сохранить в» соответствующий пункт.

После этого будет создана Личная книга макросов — вы увидите ее в редакторе Visual Basic (его можно открыть сочетанием Alt + F11).

Заключение

Главное в табличном деле — практика! Пробуйте все самостоятельно, изучайте файлы с примерами, помните: если вы что-то делаете вручную, то, скорее всего, есть способ автоматизации.

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

Чтобы узнавать про новости, читать полезные статьи и изучать приемы и функции, подпишитесь на мои каналы в «Телеграме»:

Магия Excel — https://t.me/lemur_excel,

Google Таблицы — https://t.me/google_sheets.

С любыми вопросами и предложениями пишите, пожалуйста, на электропочту: renat@shagabutdinov.ru.

Об авторе

Ренат Шагабутдинов — эксперт по Excel и Google Таблицам, обладатель сертификата MOS Excel Expert. Имеет большой опыт создания и настройки отчетности, а также автоматизации бизнес-процессов.

Автор курсов и учебных программ, проводит тренинги и мастер-классы. Автор телеграм-канала «Магия Excel», сооснователь телеграм-канала «Google Таблицы».