Как преобразовать текст URL в гиперссылку в Excel?

Предположим, у вас есть несколько URL-адресов на вашем листе, но они не связаны, и теперь вам нужно преобразовать все несвязанные URL-адреса в интерактивные гиперссылки, как показано на следующих снимках экрана. Конечно, вы можете дважды щелкнуть их один за другим, чтобы сделать их интерактивными, но это займет много времени, если URL-адресов много. Как в Excel можно автоматически преобразовать несколько несвязанных URL-адресов в интерактивные гиперссылки?

Преобразование текста URL в интерактивную гиперссылку с кодом VBA

Преобразование текста URL в интерактивную гиперссылку с помощью Kutools for Excel

Преобразование текста URL в интерактивную гиперссылку с кодом VBA

Похоже, что в Excel нет другого эффективного способа решить эту проблему, кроме использования следующего кода VBA.

1. Выберите диапазон текста URL-адреса, который вы хотите преобразовать в интерактивные гиперссылки.

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

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

Sub ConvertToHyperlinks()
'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

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

Преобразование текста URL в интерактивную гиперссылку с помощью Kutools for Excel

Возможно, код VBA является для вас сложным, здесь я могу представить вам многофункциональный инструмент -Kutools for Excel, С его Конвертировать гиперссылки функция, вы можете быстро справиться со следующими операциями:

• Извлекать актуальные адреса из гиперссылок;
• Преобразование текста URL в интерактивную гиперссылку

Если вы установили Kutools for Excel, пожалуйста, сделайте следующее:

1. Выберите диапазон текста URL-адреса, который вы хотите преобразовать в интерактивные гиперссылки.

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

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

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

Ноты:

1. Если вы хотите поместить фактические адреса в исходный диапазон, установите флажок Преобразовать исходный диапазон.

2. Если гиперссылка связана с текущим документом, отметьте Гиперссылки - это место в этом документе опцию.

Нажмите Конвертировать гиперссылки чтобы узнать больше об этой функции.

Загрузите бесплатную пробную версию Kutools for Excel прямо сейчас!

  Демо: преобразование текста URL в интерактивную гиперссылку с помощью Kutools for Excel

Связанная статья:

Как извлечь актуальные адреса из гиперссылок в Excel?