Копирование гиперссылки

Zabvo

Гость

21.03.2012 17:47:32

Добрый день!
Помогите решить проблему с копированием гиперссылок:
Есть 2 отдельных таблицы Excel. В одной из них содержатся ячейки с гиперссылками на адреса электронной почты. Как мне перенести их в другую таблицу с сохранением свойств гиперссылок (при нажатии должно открываться почтовое окно с адресом, указанным в ячейке). У меня получается только текст скопировать:(((
Необходимые адреса во второй таблице ищутся при помощи функции ВПР.

subtlety Пользователь Сообщений: 375 Регистрация: 01.01.1970	#2 21.03.2012 18:08:23 нашел вот такое решение для word: http://wordexpert.ru/page/preobrazovanie-teksta-ssylki-v-giperssylku

subtlety

Пользователь

Сообщений: 375 Регистрация: 01.01.1970

21.03.2012 18:23:07

ф-я "ГИПЕРССЫЛКА" и код типа такого:

With Worksheets(1)
.Hyperlinks.Add .Range("E5"), .Range("E5").value
End With

не работают корректно. По клику на получившуюся ссылку происходит ошибка, а не открывается пустое письмо.

А вот если скопировать результат работы ВПР и вставить, как значения, а потом пройтись F2 --> Enter, то получаются рабочие гиперссылки.

Guest Гость	#4 21.03.2012 18:28:09 Не совсем понял, что значит "пройтись F2 --> Enter". После работы ВПР в ячейке появляется текстовый адрес электронной почты без свойств гиперссылки.

subtlety Пользователь Сообщений: 375 Регистрация: 01.01.1970	#5 21.03.2012 18:36:43 Естественно, поэтому читаем еще раз: "А вот если скопировать результат работы ВПР и вставить, как значения..."

subtlety Пользователь Сообщений: 375 Регистрация: 01.01.1970	#6 21.03.2012 18:54:54 А ларчик просто открывался: =ГИПЕРССЫЛКА("mailto:" & ВПР(1;C6:D7;2;0))

Zabvo Гость	#7 21.03.2012 20:58:03 Спасибо, большое! Действительно, насколько же все просто оказалось)))

subtlety Пользователь Сообщений: 375 Регистрация: 01.01.1970	#8 21.03.2012 21:19:07 Пожалуйста! Да, мне тоже понравилось! (=

Читают тему