Не активны кнопки в Excel

Работая в Excel с большим массивом ссылок иногда требуется, чтобы текстовые URL ссылки на страницу сайта были в виде активной гиперссылки, по которой можно кликнуть мышкой и перейти на саму страницу, самый простой способ в этом случае — это активировать гиперссылку в ячейке Excel, нажав клавишу F2 и затем Enter .

 

Гиперссылки в Excel

Когда у вас всего несколько строк в таблице, то проделать эту процедуру не составит никакого труда, но если у вас несколько сотен строк или даже несколько тысяч, то такие монотонные действия займут уйму времени. Так как сделать ссылку в excel на web сайт активной и кликабельной? Чтобы ускорить этот процесс его нужно автоматизировать с помощью VBA (Visual Basic) макроса Excel!

Пишем макрос VBA Excel

Сам код макроса очень короткий и не сложный, ниже представлен макрос, который делает активными все гиперссылки, расположенные в столбце «С», код Range([c2], Range(“c” & Rows.Count).End(xlUp)). Все урлы страниц преобразуетcя в активные гиперссыки столбца «С» начиная с ячейки «С2» и далее.

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

При желании можно назначить горячую клавишу для вызова макроса, нажимаем Alt + F8, в появившемся окне мышкой выбираем нужный макрос, далее жмем кнопку Параметры и в диалоговом окне указываем любую букву для сочетания клавиш, в моё случае это Alt + d и далее кнопка ОК.

Гиперссылки в Excel

Теперь вы можете запускать макрос на активацию ссылок в столбце с помощью комбинации клавиш.

Код макросов

Оцените статью
Как в офисе.ru
Добавить комментарий