Como procurar e devolver uma hiperligação ativa no Excel?
No dia a dia com o Excel, é comum usar a função PROCV para encontrar e devolver valores associados a entradas específicas nos seus dados. Contudo, surge frequentemente um problema quando a procura devolve hiperligações: em vez de obter ligações ativas e clicáveis, recebe apenas URLs em texto simples. Por exemplo, se os seus dados de origem contiverem uma ligação web com uma hiperligação incorporada, após um PROCV típico, o resultado aparecerá apenas como texto não formatado, conforme ilustrado abaixo.
Nestes casos, garantir que a procura devolve uma hiperligação ativa — uma que possa clicar e que abra no seu navegador — melhora a usabilidade, economiza tempo e é essencial para conjuntos de dados que incluam endereços web, caminhos de ficheiros ou outros recursos clicáveis.
Este tutorial apresenta várias soluções práticas para devolver hiperligações ativas através de procuras, analisando os respetivos cenários, tipos de dados aplicáveis e limitações potenciais. Também aprenderá precauções essenciais, dicas de resolução de problemas e recomendações para escolher o melhor método de acordo com as suas necessidades na folha de cálculo.
- Procura para devolver uma hiperligação ativa com fórmula
- Código VBA – Devolver e inserir uma hiperligação ativa através de procura (cenários avançados)
Procura para devolver uma hiperligação ativa com fórmula
Para procurar e devolver um valor como uma hiperligação ativa, pode combinar as funções HIPERLIGAÇÃO e PROCV. Esta abordagem é simples e ideal para dados de origem em que as hiperligações são armazenadas como endereços URL em texto (por exemplo, "https://www.exemplo.com" ou um caminho de ficheiro de rede). Assim, o valor devolvido torna-se clicável diretamente na sua folha de cálculo.
Suponha que tem uma tabela com duas colunas: uma contendo o valor de procura (por exemplo, um nome) e outra com um URL em texto simples ou como hiperligação. Para obter a hiperligação ativa correspondente com base num valor introduzido pelo utilizador, siga estes passos:
1. Introduza a seguinte fórmula numa célula vazia onde deseja apresentar o resultado:
=HYPERLINK(VLOOKUP(D2, $A$1:$B$8,2, FALSE))2. Prima Enter para confirmar. A célula apresenta agora a hiperligação como uma ligação ativa e clicável, conforme mostrado abaixo:
Parâmetros e notas de utilização:
- D2: A célula que contém o valor que pretende procurar.
- $A$1:$B$8: O intervalo de dados em que a primeira coluna contém os valores a pesquisar e a segunda as hiperligações correspondentes. Utilize referências absolutas se pretender copiar a fórmula.
- 2: Indica que a hiperligação está na segunda coluna do seu intervalo.
Dicas:
- Se o valor procurado não for encontrado, a fórmula devolverá um erro (#N/D). Certifique-se de que o seu intervalo de valor de pesquisa contém uma correspondência exata no intervalo da tabela.
- Se quiser que o Texto de Exibição seja diferente da hiperligação real (por exemplo, mostrar um nome em vez do URL), basta adicionar um segundo parâmetro opcional à função HIPERLIGAÇÃO:
=HYPERLINK(VLOOKUP(D2,$A$1:$B$8,2,FALSE),D2)
Assim, o valor de D2 é apresentado como texto da ligação. - Esta abordagem só funciona quando as hiperligações são armazenadas como texto em formato URL padrão ou como Caminho do Arquivo. Não recupera hiperligações criadas no Excel com a função “Criar Hiperlink”, em que o Texto de Exibição difere do Endereço da hiperligação, nem nomes amigáveis que não incluam um URL bruto diretamente na célula.
Problemas comuns e resolução de problemas:
- Se o resultado não for clicável, certifique-se de que os seus dados incluem um URL web válido e completo (com "http://" ou "https://").
- Se obtiver resultados incorretos ou em falta, verifique o seu intervalo de pesquisa e certifique-se de que o índice da coluna corresponde à coluna que contém as hiperligações.
- Para ficheiros locais, certifique-se de que o caminho da hiperligação está no formato correto (por exemplo, «C:\Pasta\ficheiro.xlsx»).
Vantagens: Configuração simples, com uma fórmula que pode ser arrastada para aplicar a várias linhas — ideal para tabelas em que as hiperligações são armazenadas como URIs em texto simples.
Limitações: Não suporta a recuperação separada do Texto de Exibição e do Endereço do hiperlink quando estes forem diferentes, nem reconhece hiperligações introduzidas manualmente através da opção «Criar Hiperlink», em que apenas o Texto de Exibição é visível na célula.
Código VBA – Devolver e inserir uma hiperligação ativa através de procura (cenários avançados)
Se precisar de procurar um valor específico num intervalo e devolver a sua hiperligação ativa original — incluindo tanto o Texto de Exibição como a própria ligação clicável — em vez de apenas o URL simples, o VBA oferece uma solução fiável. Este código procura o valor pretendido no seu intervalo selecionado e, ao encontrar uma correspondência, copia a hiperligação exata (texto + endereço) para a célula que indicar. É especialmente útil quando o Texto de Exibição e o Endereço da hiperligação são diferentes ou quando os métodos baseados em fórmulas não conseguem capturar a ligação real.
Este método revela-se especialmente útil quando os seus dados contêm nomes amigáveis com hiperligações subjacentes, hiperligações para ficheiros ou pastas, ou formatos de hiperligação não padronizados. Com o VBA, pode copiar quer o texto visível da ligação quer o endereço da hiperligação subjacente, ou recriar a hiperligação numa nova localização com base no resultado de uma procura.
Precauções: Certifique-se de que as macros estão ativadas no seu ambiente do Excel. Faça sempre uma cópia de segurança da sua pasta de trabalho antes de executar scripts VBA, especialmente se estiver a trabalhar com dados importantes.
Vantagens:Lida com casos complexos — como hiperligações criadas com «Criar Hiperlink» e a separação entre o Texto de Exibição e o Endereço da hiperligação. Permite-lhe processar lotes de hiperligações ou personalizar os resultados.
Limitações: Requer conhecimentos básicos de VBA e não é suportado em todos os ambientes do Excel restritos ou baseados na web.
1. Abra o editor VBA clicando em Programador > Visual Basic. Na janela recém-aberta, clique em Inserir > Módulo e cole o seguinte código no módulo:
Sub LookupAndInsertHyperlink()
Dim LookupValue As String
Dim LookupRange As Range
Dim ResultCell As Range
Dim cell As Range
Dim hyperlinkFound As Boolean
Dim linkAddress As String
Dim linkText As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set LookupRange = Application.InputBox("Select the lookup range (must include display text/cell and hyperlink)", xTitleId, Selection.Address, Type:=8)
Set ResultCell = Application.InputBox("Select the cell to output the hyperlink", xTitleId, "", Type:=8)
LookupValue = Application.InputBox("Enter the value to lookup", xTitleId, "", Type:=2)
hyperlinkFound = False
For Each cell In LookupRange
If cell.Value = LookupValue Then
If cell.Hyperlinks.Count > 0 Then
linkAddress = cell.Hyperlinks(1).Address
linkText = cell.Value
ResultCell.Hyperlinks.Add Anchor:=ResultCell, Address:=linkAddress, TextToDisplay:=linkText
hyperlinkFound = True
Exit For
End If
End If
Next
If Not hyperlinkFound Then
ResultCell.Value = "No matching hyperlink found"
End If
End Sub2. Para executar o script, com a sua pasta de trabalho aberta, prima Alt + F8, selecione LookupAndInsertHyperlink e clique em Executar.
3. Nos diálogos que surgirem:
- Selecione o seu intervalo de dados de pesquisa (incluindo tanto os valores como as respetivas hiperligações).
- Escolha a célula de destino para a hiperligação resultante.
- Introduza o valor de procura que deseja localizar. A macro encontrará o valor correspondente, extrairá a respetiva hiperligação — mesmo que o Texto de Exibição difira da ligação subjacente — e inseri-la-á como uma hiperligação ativa na localização escolhida.
Dicas práticas e lembretes de erros:
- Se o valor não for encontrado ou se não existir nenhuma hiperligação na célula, o destino mostrará «Nenhuma hiperligação correspondente encontrada.»
- Se pretender realizar várias pesquisas em simultâneo, considere expandir o código VBA ou executar o script quantas vezes forem necessárias.
- Este script é eficaz mesmo quando a hiperligação não consiste apenas numa simples cadeia de caracteres URL na célula, copiando igualmente o endereço e o Texto de Exibição.
Sugestões para resolução de problemas:
- Verifique se o seu intervalo de entrada inclui a coluna que contém as hiperligações reais.
- Se a macro VBA não for executada, verifique se as macros estão ativadas nas definições do Excel.
- Se surgir a mensagem «Nenhuma hiperligação correspondente encontrada», confirme se o valor de pesquisa está correto e se as hiperligações correspondentes existem nessa linha.
- Guarde sempre a sua pasta de trabalho antes de executar macros, caso precise de reverter alterações.
Resumo:
- Utilize o método com fórmula para criar hiperligações baseadas em texto e realizar procuras rápidas.
- Utilize o método VBA para necessidades mais avançadas — como restaurar hiperligações inseridas manualmente com «Criar Hiperligação», recuperar simultaneamente o Texto de Exibição e o endereço do link ou aplicar resultados dinamicamente a intervalos.
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos