Как создать в Excel выпадающий список со ссылками?
В Excel выпадающий список помогает эффективно и легко справляться с рабочими задачами. Но пробовали ли вы когда-нибудь создать такой список со ссылками, чтобы при выборе URL из него гиперссылка открывалась автоматически? В этой статье я покажу, как создать выпадающий список с активными гиперссылками в Excel.
Создание выпадающего списка со ссылками с помощью формулы
Создание выпадающего списка со ссылками с помощью поля со списком (combo box)
Создание выпадающего списка со ссылками с помощью формулы
В Excel нет прямого способа создать выпадающий список с активными гиперссылками, но вы можете использовать формулу для автоматической активации гиперссылки, выбранной из такого списка. Выполните следующие действия:
После создания выпадающего списка введите в ячейку E2 (расположенную рядом с ячейкой выпадающего списка) следующую формулу: =HYPERLINK(D2,«Go To Website!») (D2 — это ячейка с выпадающим списком) и нажмите клавишу Enter. После этого, когда вы выберете вариант из выпадающего списка и щелкните по ячейке с формулой, гиперссылка откроется.
Создание выпадающего списка со ссылками с помощью поля со списком (combo box)
На самом деле вы также можете создать выпадающий список со ссылками с помощью поля со списком (combo box) — и как только вы выберете гиперссылку из него, она тут же активируется. Выполните следующие действия:
Сначала создайте два имени ячеек: одно для списка гиперссылок и одно для связанной ячейки.
1. Присвойте вашему списку гиперссылок имя ячейки «Hyperlinks», а пустой ячейке — имя «Linked_cell», которое будет использоваться как связанная ячейка для значения поля со списком. Введите эти имена в Поле имени. См. снимки экрана:
Затем создайте поле со списком и настройте его параметры.
2. Щелкните Разработчик > Вставить > Поле со списком (ComboBox) и перетащите курсор, чтобы нарисовать поле нужного размера.
Совет: если на ленте отсутствует вкладка Разработчик, ознакомьтесь со статьёй Как отобразить вкладку «Разработчик» в Excel 2007/2010/2013 на ленте?, чтобы активировать её.
3. После вставки поля со списком щелкните по нему правой кнопкой мыши и выберите пункт Формат элемента управления. В диалоговом окне Формат элемента управления перейдите на вкладку Элемент управления и введите имена Hyperlinks и Linked_cell, которые вы создали на шаге «Имя ячейки 1», соответственно в поля Входной диапазон и Связь с ячейкой. См. снимок экрана:
4. Затем нажмите кнопку ОК, чтобы завершить настройку. Далее щелкните правой кнопкой мыши по полю со списком и выберите пункт Назначить макрос в контекстном меню. В диалоговом окне Назначить макрос нажмите кнопку Создать. См. снимок экрана:
5. В появившемся окне Microsoft Visual Basic для приложений скопируйте и вставьте приведённый ниже код между существующими строками скрипта. См. снимок экрана:
Код VBA: активация гиперссылок из поля со списком:
HyperLink_Index = Range("Linked_cell")
If Range("HyperLinks").Offset(HyperLink_Index - 1, 0).Hyperlinks(1).Name <> "" Then
Range("HyperLinks").Offset(HyperLink_Index - 1, 0).Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
End If
6. Затем сохраните этот код. Теперь при выборе гиперссылки из выпадающего списка она будет открываться автоматически.
Демонстрация: создание выпадающего списка со ссылками в Excel
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек