[ Регистрация · Вход · Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: irakitin2014  
Выпадающий список из именного диапазона гиперссылок с
GuyverrДата: Четверг, 15.02.2018, 23:12 | Сообщение # 1
Рядовой
Группа: Проверенные
Сообщений: 5
Репутация: 0
Статус: Offline
Прочитал
http://perfect-excel.ru/publ/excel/polzovatelskij_interfejs/sozdanie_vypadajushhego_spiska_v_jachejke/8-1-0-18
понравилась статья но под свои нужды так и не смог сделать
 Весь мозг себе вынес т.к . совсем не силен в макросах и кодах VBA а возможно без этого никак  не получится.
  Мне нужно на листе сделать именной диапазон из любого целого столбца с названием например "смешанные_ссылки", его верняя  ячейка( то есть в строке1) будет иметь такое же название, а ниже будут гиперссылки на внешние сайты и внутренние файлы на жестком диске(видео,картинки,пдф и тд). Далее сделать выпадающий список в любой ячейке из этого  именного диапазона (смешанные_ссылки) с сохранением адреса гиперссылок на внешние и внутренние  адреса ссылок при выборе из него(лучше что бы переход осуществлялся не сразу по выбору из списка а после выбора  дополнительным кликом на ссылку в ячейке списка). Я пробовал делать  так с внешними ссылкам(на сайты) и у меня ячейка приобретала  значение  одного адреса из списка гиперссылок  и что бы не выбрал из списка все  будет вести на один и тот же  адрес сайта . Тоже самое делал в гугл таблицах ,там при выборе из списка гиперссылки сохраняются для каждого значения из него,все как нужно (а внутренние там нельзя). В Excel 2016 так же пробовал делать выпадающий список из гиперссылок только на внутренние файлы, тут он их вообще  видит только как текст походу.
Неужели все это не возможно осуществить в excel , должно же быть какое то решение: макрос, надстройка, VBA код? Хотелось бы что  это решение было не на конкретную ячейку а хотябы на весь лист или лучше книгу действовало(то есть для любой ячейки со списком)..
Если именной диапазон буде ссылаться на умную таблицу с моими гиперссылками, а после  как то сделать выпадающий список в ячейке с этими гиперссылками( с сохранением адреса гиперссылки после каждого выбора из него и переходом по клику) то это было бы супер для меня.
Буду при много благодарен всем отозвавшимся помочь.
Прикрепления: ___.xlsm (11.8 Kb)
 
irakitin2014Дата: Пятница, 16.02.2018, 07:20 | Сообщение # 2
Генерал-майор
Группа: Модераторы
Сообщений: 312
Репутация: 6
Статус: Offline
Доброго времени. Попробуйте почитать
http://www.excelworld.ru/forum/2-317-1#3659



для спасибов ЯД 41001877306852
 
dsb75Дата: Пятница, 16.02.2018, 10:11 | Сообщение # 3
Генералиссимус
Группа: Администраторы
Сообщений: 133
Репутация: 2
Статус: Offline
В теории - не вижу особых проблем. Надо отслеживать факт изменения ячейки, в которой реализован выпадающий список, и после изменения сразу прикручивать к ячейке гиперссылку на основе содержимого. Работающий код, извините, не дам, занят сильно.
 
GuyverrДата: Пятница, 16.02.2018, 23:58 | Сообщение # 4
Рядовой
Группа: Проверенные
Сообщений: 5
Репутация: 0
Статус: Offline
Цитата dsb75 ()
Надо отслеживать факт изменения ячейки, в которой реализован выпадающий список, и после изменения сразу прикручивать к ячейке гиперссылку на основе содержимого. Работающий код, извините, не дам, занят сильно.
Я как раз в этом и не силен, и не смогу написать такой код сам(

Добавлено (16.02.2018, 23:58)
---------------------------------------------
Есть такой VBA код

Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C3")) Is Nothing Then
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Target.Value
Target.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
'        Target.Hyperlinks.Delete
End If
End Sub


Вроде работает неплохо, но мне бы хотелось понять как сделать так  что бы он работал на весь лист или книгу а не на одну ячейку(тут С3) и чтобы сразу не переходил  по ссылке по выбору из списка, а только выбирал ее в ячейку и только по дополнительному клику по ней был переход .


Сообщение отредактировал Guyverr - Пятница, 16.02.2018, 20:12
 
  • Страница 1 из 1
  • 1
Поиск: