Como converter um conjunto de URLs de texto em hiperlinks ativos no Excel?

Se você tem uma lista de endereços URL que são texto simples, como você poderia ativar essas URLs de texto para transformá-las em hiperlinks clicáveis, conforme mostrado na captura de tela a seguir?

Converter um conjunto de URLs de texto em hiperlinks ativos com fórmulas

Converter um conjunto de URLs de texto em hiperlinks ativos Kutools para Excel

Converter um conjunto de URLs de texto em hiperlinks ativos com código VBA

Converter um conjunto de URLs de texto em hiperlinks ativos com fórmulas

Clicar duas vezes na célula para ativar os hiperlinks um por um pode desperdiçar muito tempo; aqui, posso apresentar algumas fórmulas para você. Por favor, siga os passos abaixo:

Insira esta fórmula: =HYPERLINK(A2, A2) em uma célula em branco onde você deseja exibir o resultado e, em seguida, arraste a alça de preenchimento para aplicar essa fórmula às células desejadas, e todos os URLs de texto serão convertidos em hiperlinks ativos, veja a captura de tela:

Converter um conjunto de URLs de texto em hiperlinks ativos Kutools para Excel

Aqui está uma ferramenta prática - Kutools para Excel, com seu recurso Converter Hiperlinks, você pode rapidamente tanto converter um conjunto de URLs de texto em hiperlinks clicáveis quanto extrair endereços reais de hiperlinks de sequências de texto de hiperlink.

Após instalar o Kutools para Excel, por favor, faça o seguinte:

1. Selecione as células que contêm as URLs de texto que você deseja ativar.

2. Em seguida, clique em Kutools > Vincular > Converter Hiperlinks, veja a captura de tela:

3. Na caixa de diálogo Converter Hiperlinks, selecione a opção Converter conteúdo da célula para endereços de hiperlinks sob a seção Tipo de conversão, e depois marque Converter intervalo de origem se você quiser colocar os endereços reais no intervalo original, veja a captura de tela:

4. Em seguida, clique no botão OK, e os URLs de texto serão ativados imediatamente, veja a captura de tela:

Observação: Se você deseja colocar o resultado em outra célula em vez da célula original, desmarque a opção Converter intervalo de origem e selecione uma célula onde você precisa exibir o resultado a partir do Intervalo de resultados, conforme mostrado na captura de tela a seguir:

Clique para baixar Kutools para Excel e experimente gratuitamente agora!

Converter um conjunto de URLs de texto em hiperlinks ativos com código VBA

O código VBA abaixo também pode ajudá-lo a resolver essa tarefa, por favor, faça o seguinte:

1. Pressione e segure as teclas ALT + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.

Código VBA: Converter um conjunto de URLs de texto em hiperlinks ativos:

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. Em seguida, pressione a tecla F5 para executar este código, e uma caixa de aviso será exibida para lembrá-lo de selecionar as células que deseja converter em hiperlinks clicáveis, veja a captura de tela:

4. E então clique no botão OK, os URLs de texto simples foram convertidos em hiperlinks ativos, veja a captura de tela: