Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1 2 След.
RSS
Привязка гиперссылки к текущей ячейке
 
#1
02.12.2013 21:52:03
Доброго всем дня.
Нужна небольшая помощь. Вопрос собственно в названии, но попробую кратко но понятно описать суть.
Как привязать гиперссылку к текущей ячейке, чтобы при нажатии на нее не открывался Outlook, а просто ничего не происходило. Т.е. имеется куча ячеек с E-mail адресами  и при нажатии на них открывается Outlook, а это мне не нужно.
Менять ссылку на ячейку вместо MailTo в настройках гиперссылки - не вариант, т.к. адресов много.
Пытался записать макрорекордером изменение ссылки с MailTo на текущую ячейку, но там только по Selection. А я так понимаю, что нужно что-то вроде по Target или ActiveCell, вобщем понимаю, а записать не могу, ума не хватает.
Какие сточки мне записать для изменения ссылки в текущей ячейке.
 
 
 
#2
02.12.2013 21:56:17
Цитата
чтобы при нажатии на нее ... ничего не происходило.
А зачем тогда гиперссылка?
 
 
 
#3
02.12.2013 22:05:10
Юрий М может я немножко не так выразился ни ничего не происходило, а гиперссылка ссылалась на эту же ячейку.
Я хотел это написать, в первом посте, но думал что и так много лишнего понаписывал.
Это нужно для того чтобы не мешало работе макроса, который запускается через эту гиперссылку. Просто получается что при работе макроса, еще и Outlook запускается.
 
 
 
#4
02.12.2013 22:08:38
Так укажите ей тогда вместо электронной почты адрес ячейки (место в документе).
 
 
 
#5
02.12.2013 22:24:14
Теперь вы меня не поняли. Я ж написал что ячеек с адресами много и они пополняются, каждую ячейку в макросе указывать - это тоже самое что в настройках гиперссылки менять ссылку с MailTo на ячейку - хлопотное дело. А вот указать в макросе текущую ячейку было бы замечательно, но как я уже писал не знаю как это сделать.
 
 
 
#6
02.12.2013 22:27:34
Для начала включите макрорекордер и запишите изменение одной гиперссылки на текущую ячейку. А затем добавим перебор этих ячеек в цикле.
 
 
 
#7
02.12.2013 22:43:34
Это я уже делал
Код
Range("F4").Select
    Selection.Hyperlinks(1).Address = ""
    Selection.Hyperlinks(1).SubAddress = "Лист1!F4"
Но при нажатии на другую гипперссылку находящуюся в другой ячейке например F5 будет перепрыгивать на F4 это конечно не страшно две ячейки рядом, но что делать если нажать на гиперссылку например в ячейке F365, то фокус переместиться на F4, а это не есть хорошо.
Вот я и хотел чтоб каждая гиперссылка ссылалась исключительно на свою ячейку. Т.е. Текущая гиперссылка ссылается на текущую ячейку в которой она находится. Там вроде как-то и без цикла можно.
 
 
 
#8
02.12.2013 23:30:52
Ну так осталось чуть-чуть))
Код
Sub TestHyperLinks()
Dim LastRow As Long, i As Long
    LastRow = Cells(Rows.Count, 6).End(xlUp).Row
    For i = 2 To LastRow
        With Cells(i, 6)
            .Hyperlinks(1).Address = ""
            .Hyperlinks(1).SubAddress = "Лист1!" & .Address(0, 0)
        End With
    Next
End Sub
 
 
 
#9
03.12.2013 00:16:11
не работает  :(
 
 
 
#10
03.12.2013 00:20:07
У меня работает.
 
 
 
#11
03.12.2013 01:21:14
Все тоже самое что и у меня было. По-прежнему при нажатии на гиперссылку открывается Outlook
 
 
 
#12
03.12.2013 12:53:20
У меня не открывается.
 
 
 
#13
03.12.2013 13:26:48
Вот файл
 
 
 
#14
03.12.2013 15:15:29
Поменяйте двойку на четвёрку - у Вас же данные начинаются с четвёртой строки.
Код
For i = 4 To LastRow
Всё работает.
 
 
 
#15
03.12.2013 17:38:15
Что-то я ничего не могу понять. Поменял. Результата ноль.
 
 
 
#16
03.12.2013 17:43:51
Цитата
ничего не могу понять
Выполняем?!
" 2.2. Опишите максимально подробно вашу задачу и желаемый результат. Желательно уточнить вашу версию Excel. "
И ОС, наверное, ... ;)
"Ctrl+S" - достойное завершение ваших гениальных мыслей!.. ;)
 
 
 
#17
03.12.2013 18:18:12
Так вроде бы я все подробно описал
ОС 7 x86 Office 2013
Задача:
При нажатии на гиперссылку в любой ячейке она должна ссылаться на свою же ячейку, а не запускался Outlook. Запуск Outlooka мне не нужен. Т.е. при нажатии на гиперссылку например в ячейке F4 она ссылалась на F4, при нажатии на гиперссылку в ячеке F5 - она ссылалась на ячейку F5. Это можно сделать если поменять в настройках гиперссылки ссылку на ячейку, вместо адреса MailTo. Но таких гиперссылок у меня куча и каждую вручную менять это долго, к тому же они пополняются.
Вот я и хотел чтоб подсказали, какие строчки в коде написать, чтобы менялась в гиперссылке ссылка с MailTo на текущую ячейку, из которой она была запущена.
P.S. Если это невозможно, то так и скажите, чтоб я сам не заморачивался и людям голову не забивал всякой ерундой. Просто я думал что это возможно, раз макрорекордером изменения в настройках гиперссылки выделенной ячейки отслеживаются, значит можно как-то и жестко привязать все ячейки в которых находятся гиперссылки.
 
 
 
#18
03.12.2013 18:37:39
Цитата
Если это невозможно, то так и скажите, чтоб я сам не заморачивался и людям голову не забивал всякой ерундой. Просто я думал что это возможно...
Это возможно, и это работает: я прямо в ВАШЕМ файле меняю 2 на 4, запускаю макрос - все четыре ссылки переориентируются каждая на СВОЮ ячейку. Обращения к Outlook Не происходит.  
 
 
 
#19
03.12.2013 18:46:19
Цитата
меняю 2 на 4, запускаю (!!!) макрос...
А ларчик вона как открывается... Но хотелось, наверное, по обращению/активации ячейки с гипер... ;)
"Ctrl+S" - достойное завершение ваших гениальных мыслей!.. ;)
 
 
 
#20
03.12.2013 18:54:50
Юрий М после вашего сообщения решил еще раз попробовать, может быть я что-то ступил. Но нет, не работает. Снова запускается Outlook. Только если потом захожу в настройки гиперссылки и меняю ссылку на ячеку, только тогда outlook не запускается. Это просто пичалька какаята.
 
 
 
#21
03.12.2013 18:56:14
Z все верно, я же про это и писал
 
 
 
#22
03.12.2013 18:58:44
Цитата
не работает. Снова запускается Outlook.
А макрос у Вас вообще работает? Они (макросы) разрешены?
 
 
 
#23
03.12.2013 19:17:26
Да другие макросы работают.
 
 
 
#24
03.12.2013 19:20:54
Попробуйте.
Кнопка удаляет имеющиеся ссылки. При добавлении новых адресов в столбец F ссылки удаляются автоматически.
 
 
 
#25
03.12.2013 19:22:57
Тогда не понимаю, в чём проблема... А если запускаете макрос прямо в том файле, что выложен на сайт в #13 (без изменения 2 на 4) - макрос срабатывает молча и не ругается?
 
 
 
#26
03.12.2013 19:43:30
Юрий М
Код
что выложен на сайт в #13
открывает Outlook

Sergei_A похоже на то. Работает. Вот так мне и нужно было, только без кнопки, а чтоб ссылки менялись автоматически. Т.е. я правильно вас понял, после того как раз кнопку нажал, ее можно удалить. Или ее теперь постоянно надо будет нажимать. Нельзя ли это как-то объединить и сделать без кнопки.
 
 
 
#27
03.12.2013 19:45:46
Цитата
открывает Outlook
Макрос НЕ ОТКРЫВАЕТ Outlook!!! Я просил Вас выполнить макрос в том файле.
 
 
 
#28
03.12.2013 19:48:02
antal10, в файле Sergei_A именно мой макрос. Вы издеваетесь?
Ушёл из темы.
 
 
 
#29
03.12.2013 20:19:22
Да, я всего лишь приделал кнопку к макросу, который написал Вам Юрий М.
Не понимаю в чем Ваша проблема. Макрос Юрия нужно было запустить! Как Вы это делали???  Впрочем.....
Я в своём ответе #24 вроде понятно всё написал. Ещё раз повторю - Попробуйте!
 
 
 
#30
03.12.2013 20:23:50
Юрий М не надо нервничать, вы что думаете что мне заняться нечем или мне 15 лет? Я сам уже с этим намудохался и писал, что если это не возможно, то не надо заморачиваться, я не не собираюсь этим никого напрягать. Я вам объяснил что в #13 файл запускается Outlook. Я понимаю что и там и там ваш макрос.  Я же не оспариваю чей это макрос ваш или не ваш. Но в файле #24 после нажатия кнопки все заработало, спасибо вам за ВАШ макрос, а до нажатия запускался Outlook. Я всего лишь говорю, что тот не работал, а этот работает, но после нажатия кнопки удалить ссылки. Я могу  вам видео снять для наглядности, чтоб вы поняли, что все почесноку. А вы сразу ушел из темы - ушел из темы.

P.s. Наверное за целый день общения на форуме с разными людьми, все-таки сказывается. Юрий М поберегите нервы. ;)  Вам еще модерировать и модерировать.
 
 
 
Страницы: 1 2 След.
Наверх