Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Текст в ячейке прописать в адрес гиперссылки
 
#1
06.05.2016 12:21:42
Есть файл с большим списком url в каждой ячейке (порядка 10 000). Как из этого текста сделать активные гиперссылки, чтобы по клику мишки можно было производить переход по указанному адресу в интернете.
Пример прикладываю.
 
 
 
#2
06.05.2016 12:27:08
Цитата
adventy написал:  чтобы по клику мишки
А мишка не обидится если в него постоянно тыкать  :)
Лень двигатель прогресса, доказано!!!
 
 
 
#3
06.05.2016 12:30:04
:) да, опечатался. *мышка
 
 
 
 
#4
06.05.2016 12:42:27
если все начинаются на "http" можно как вариант:
Код
Sub Макрос()
Dim R
For Each R In Range("A1:A10000")
    If Mid(R.Value, 1, 4) = "http" Then ActiveSheet.Hyperlinks.Add Anchor:=R, Address:=R.Value, TextToDisplay:=R.Value
Next
End Sub
Только задать нужный диапазон
Изменено: devilkurs_now - 06.05.2016 12:43:50
MS Office 2007,2010

ЛЕНЬ-двигатель прогресса!
 
 
 
#5
06.05.2016 12:48:52
devilkurs_now Спасибо !
То, что надо!
 
 
 
Страницы: 1
Наверх