Перейти до основного матеріалу

Як перетворити купу текстових URL-адрес на активні гіперпосилання в Excel?

Якщо у вас є список URL-адрес, які є звичайним текстом, як би ви могли активувати текстові URL-адреси тез до гіперпосилань, які можна натиснути, як показано на наступному знімку екрана?

doc активувати гіперпосилання 1

Перетворіть купу текстових URL-адрес на активні гіперпосилання за допомогою формул

Перетворіть купу текстових URL-адрес на активні гіперпосилання за допомогою коду VBA

Перетворіть купу текстових URL-адрес на активні гіперпосилання Kutools для Excel


стрілка синя права міхур Перетворіть купу текстових URL-адрес на активні гіперпосилання за допомогою формул

Щоб двічі клацнути клітинку, щоб активувати гіперпосилання по одному, ви витратите багато часу, ось, я можу ввести для вас деякі формули, будь ласка, зробіть наступне:

Введіть цю формулу: = HYPERLINK (A2, A2) у порожню комірку, де потрібно вивести результат, а потім перетягніть маркер заповнення вниз, щоб застосувати цю формулу до потрібних комірок, і всі текстові URL-адреси перетворені в активні гіперпосилання, див. знімок екрана:

doc активувати гіперпосилання 2


стрілка синя права міхур Перетворіть купу текстових URL-адрес на активні гіперпосилання за допомогою коду VBA

Наведений нижче код VBA також може допомогти вам вирішити це завдання, будь ласка, виконайте наступне:

1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуліта вставте наступний код у вікно модуля.

Код VBA: Перетворити купу текстових URL-адрес на активні гіперпосилання:

Sub activateHyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub

3. Потім натисніть F5 клавішу для запуску цього коду, і вискакує підказка, щоб нагадати вам вибрати комірки, які ви хочете перетворити на клікабельні гіперпосилання, див. знімок екрана:

doc активувати гіперпосилання 3

4. А потім клацніть OK , URL-адреси простого тексту перетворені в активні гіперпосилання, див. знімок екрана:

doc активувати гіперпосилання 4


стрілка синя права міхур Перетворіть купу текстових URL-адрес на активні гіперпосилання Kutools для Excel

Ось зручний інструмент -Kutools для Excel, З його Перетворити гіперпосилання функцію, ви можете швидко обидва перетворити купу текстових URL-адрес у гіперпосилання, які можна натиснути та витяг реальних адрес гіперпосилання з текстового рядка гіперпосилання.

Kutools для Excel : з більш ніж 300 зручними надбудовами Excel, які можна спробувати без обмежень протягом 30 днів. 

після установки Kutools для Excel, будь ласка, зробіть так:

1. Виділіть комірки, містить текстові URL-адреси, які потрібно активувати.

2. Потім натисніть Кутулс > посилання > Перетворити гіперпосилання, див. скріншот:

3, в Перетворити гіперпосилання діалогове вікно, виберіть Вміст комірки замінює адреси гіперпосилань опція під Тип перетворення розділ, а потім перевірте Перетворити джерело діапазон, якщо ви хочете поставити фактичні адреси до вихідного діапазону, див. знімок екрана:

doc активувати гіперпосилання 6

4. Потім натисніть Ok , а текстові URL-адреси активовано відразу, див. знімок екрана:

doc активувати гіперпосилання 4

примітки: Якщо ви хочете перенести результат в іншу комірку замість початкової комірки, зніміть прапорець Перетворити джерело діапазон і виберіть комірку, де вам потрібно вивести результат з діапазону результатів, як показано на наступному знімку екрана:

doc активувати гіперпосилання 7

Натисніть, щоб завантажити Kutools для Excel та безкоштовну пробну версію зараз!

Найкращі інструменти продуктивності офісу

🤖 Kutools AI Aide: Революціонізуйте аналіз даних на основі: Інтелектуальне виконання   |  Згенерувати код  |  Створення спеціальних формул  |  Аналізуйте дані та створюйте діаграми  |  Викликати функції Kutools...
Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

Опис


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Comments (4)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
LA OPCION 2:
Convierta un montón de URL de texto en hipervínculos activos con código VBA

ANDA PERFECTO!
GRACIAS!
Rated 5 out of 5
This comment was minimized by the moderator on the site
Tak for input, men jeg kunne ikke få konverteringen til at virke.

Den skrev bare en lang liste text:

= HYPERLINK (A2, A2)

Problemet var, at du havde skrevet formlen med komma og ikke med semikolon.

Den rette formel er =hyperlink(A2;A2)
This comment was minimized by the moderator on the site
Thank you much!!!!
This comment was minimized by the moderator on the site
Спасибо большое за ваш труд
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations