Главная » Статьи » Excel » Макросы и программы VBA

Оглавление файла на основе гиперссылок

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

Мой макрос ярко выделяется из бесконечно унылой серой массы тем, что он:

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

  2. Оглавление сделано при помощи фигур, поэтому выглядит весьма эстетично (рамочки, тень, выравнивание, etc.)

Это очень сильно сокращает время на перемещения между листами, если в вашей книге их более 15.

Скачать демонстрацию

Файл для скачивания

Перенос кода в вашу книгу

Подробно описан тут. Вам необходимо перенести модуль с названием TOC.

Более простой вариант

Есть более простой вариант, не требующий переноса кода в вашу книгу:

  1. Откройте в Excel оба файла: и ваш, где надо создать оглавление, и мой демонстрационный

  2. Перейдите на свой файл, создайте лист для оглавления

  3. Через Alt+F8 вызовите макрос HyperTOC.xlsm!Создать_оглавление

Код проекта

Категория: Макросы и программы VBA | Добавил: dsb75 (30.01.2015) | Автор: Батьянов Денис E W
Просмотров: 1702 | Комментарии: 1 | Теги: table of contents, оглавление, гиперссылка, hyperlink | Рейтинг: 5.0/2
Всего комментариев: 1
0
1 dsb75   (30.01.2015 18:09)
Граждане! В 2007 офисе код встаёт на 41 строке кода. Там нет такой константы. Просто закомментируйте эту строку!

Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс.Метрика