No Excel, tenho uma coluna de links que mostra o texto em vez do link real.
Preciso mesmo dos links, há alguma forma de converter a coluna inteira de modo a que os links fiquem expostos? Caso contrário, terei de clicar em cada link, abri-lo num browser, e copiar e colar o endereço…
Além disso, estou no Excel 2008 para Mac, por isso parece que não posso fazer macros…
Resposta curta: não se pode automatizar isto sem VBA.
Isto é num computador Windows 7; basta substituir os atalhos pelos seus correspondentes Mac.
Public Function GetURL(c As Range) As String
On Error Resume Next
GetURL = c.Hyperlinks(1).Address
End Function
Aqui está uma solução VBA para aqueles que a podem utilizar.
Crie um módulo VBA com o seguinte código:
=GetURL(A1)
Para usar, introduza o seguinte em qualquer célula:
onde A1 contém um hyperlink.
A função no trabalho:
Isto pode parecer um método de força bruta, mas é a melhor maneira que já arranjei. (Descobri esta página quando eu próprio tive a mesma pergunta há uma hora atrás… podia-se passar o dia todo à procura, mas por vezes é mais fácil fazê-lo e acabar com ele).
1) Copiar e colar apenas as células que contêm as hiperligações para uma nova folha de cálculo.
2) Exportar a folha de cálculo, clicar em “Change File Type”, seleccionar “Save As Another File Type” e guardá-la como uma página web (também conhecida como ficheiro HTML).
3) Abra a página web no seu navegador e veja a fonte.
4) Copie e cole a fonte num editor de texto.
5) Usando a função Encontrar/Substituir do editor de texto, remover o texto principal e o texto final de cada hiperlink. (Por outras palavras, substituir o referido texto por nada: “”) Note que este texto deve ser idêntico para cada hiperlink.
6) Deverá agora ter um ficheiro de texto com nada mais do que hiperligações. Copie e cole conforme necessário na sua folha de cálculo original ou utilize como/onde desejar.
Editado para declarar que pode realmente exportar para um ficheiro separado que é HTM. Feche o ficheiro e reabra-o novamente em Excel e ele resolverá o problema. A fórmula =Hyperlink desapareceu e as ligações são convertidas em ligações regulares. Este método poupou-me horas e foi muito simples e não tive de lidar com scripts ou fórmulas ou VBA ou Macros.
Eu uso um mac e isto funcionou para mim: destaque a coluna que precisa de converter, no menu Inserir, abra “Hyperlink”. Elimine qualquer texto que apareça na caixa Mostrar. Dirá “[várias células seleccionadas]” se o seu texto de exibição for diferente entre células. Assim que clicar em OK, apenas os links aparecerão na sua folha de trabalho. Se precisar de converter células individuais em vez de uma coluna inteira, destaque todas as células que precisa de converter, clique com o botão direito do rato, seleccione “editar hiperlink” e siga os mesmos passos para apagar o texto na caixa de Visualização.
Nos anos desde que esta pergunta foi feita, o Excel acrescentou a função =GetURL(cell) para que possa fazer isto sem deixar cair a sua própria VBA.