Как преобразовать множество текстовых URL-адресов в активные гиперссылки в Excel?

Если у вас есть список URL-адресов, представленных простым текстом, как можно сделать эти текстовые URL-адреса кликабельными гиперссылками, как показано на следующем скриншоте?

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

Преобразование множества текстовых URL-адресов в активные гиперссылки Kutools для Excel

Преобразование множества текстовых URL-адресов в активные гиперссылки с помощью кода VBA

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

Дважды щелкать по каждой ячейке, чтобы активировать гиперссылки по одной, займет много времени. Здесь я могу предложить вам несколько формул, пожалуйста, действуйте следующим образом:

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

Преобразование множества текстовых URL-адресов в активные гиперссылки Kutools для Excel

Вот удобный инструмент — Kutools для Excel, с его функцией Конвертировать гиперссылки вы можете быстро как преобразовать множество текстовых URL-адресов в кликабельные гиперссылки, так и извлечь реальные адреса гиперссылок из текстовой строки гиперссылки.

После установки Kutools для Excel, пожалуйста, сделайте следующее:

1. Выберите ячейки, содержащие текстовые URL-адреса, которые вы хотите активировать.

2. Затем нажмите Kutools > Ссылка > Конвертировать гиперссылки, см. скриншот:

3. В диалоговом окне Конвертировать гиперссылки выберите опцию Конвертировать содержимое ячейки в адрес гиперссылки под разделом Тип преобразования, а затем отметьте Конвертировать исходный диапазон, если вы хотите поместить фактические адреса в исходный диапазон, см. скриншот:

4. Затем нажмите кнопку ОК, и текстовые URL-адреса будут активированы сразу же, см. скриншот:

Примечание: Если вы хотите поместить результат в другую ячейку вместо исходной ячейки, пожалуйста, снимите отметку с Конвертировать исходный диапазон и выберите ячейку, куда нужно вывести результат, из Диапазона результата, как показано на следующем скриншоте:

Нажмите, чтобы скачать Kutools для Excel и попробовать бесплатно прямо сейчас!

Преобразование множества текстовых URL-адресов в активные гиперссылки с помощью кода VBA

Следующий код VBA также может помочь вам решить эту задачу, пожалуйста, действуйте следующим образом:

1. Удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

2. Нажмите Вставить > Модуль и вставьте следующий код в окно Модуля.

Код 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, чтобы запустить этот код, и появится всплывающее окно с напоминанием выбрать ячейки, которые вы хотите преобразовать в кликабельные гиперссылки, см. скриншот:

4. Затем нажмите кнопку OK, и простые текстовые URL-адреса будут преобразованы в активные гиперссылки, см. скриншот: