Excel: convierta una columna con hipervínculos para mostrar solo los enlaces


21

En Excel, tengo una columna de enlaces que muestran texto en lugar del enlace real.

Realmente necesito los enlaces, ¿hay alguna forma de convertir en masa la columna completa para que los enlaces estén expuestos? De lo contrario, tendré que hacer clic en cada enlace, abrirlo en un navegador y copiar y pegar la dirección ...

Además, estoy en Excel 2008 para Mac, así que parece que no puedo hacer macros ...

Respuestas:


37

Respuesta corta: no puedes automatizar esto sin VBA.

Manual

Esto está en una computadora con Windows 7; simplemente reemplace los accesos directos con sus correspondientes contrapartes de Mac.

  1. Resalta una celda con un hipervínculo.
  2. Presione CTRL+ K. Esto abre el cuadro de diálogo de hipervínculo (ver imagen a continuación). Una vez que se abre, encontrará que su cursor ya está en el campo Dirección.
  3. Presione CTRL+ Apara resaltar la URL completa.
  4. Presione CTRL+ Cpara copiarlo.
  5. Presione ESCo Enterpara cerrar el cuadro de diálogo Hipervínculo.
  6. Pegue la URL en algún lugar a través de CTRL+ V.

ingrese la descripción de la imagen aquí

VBA

Aquí hay una solución VBA para aquellos que pueden usarla.

Cree un módulo VBA con el siguiente código:

Public Function GetURL(c As Range) As String
    On Error Resume Next
    GetURL = c.Hyperlinks(1).Address
End Function

Para usar, ingrese lo siguiente en cualquier celda:

=GetURL(A1)

donde A1 contiene un hipervínculo.

La función en el trabajo:

ingrese la descripción de la imagen aquí


99
Ese es un gran fragmento. Para aquellos que se preguntan cómo agregar este código a su hoja de trabajo ... Presione Alt + F11 para mostrar el Editor de Visual Basic. Luego haga clic en "Insertar -> Módulo". Pegue el código que Ellesa proporcionó en el área de texto y luego puede cerrar el VBE y comenzar a usar la función.
BA_Webimax

Necesitaba una razón para volver a aprender agregando funciones de usuario a Excel. Una lista de 4060 enlaces activos (incrustados) fue la razón. Esta publicación (de Ellesa) fue la respuesta. Y @BA_Webimax, incluso me salvaste de tener que recordar CÓMO agregarlo. Me tomó más tiempo escribir este comentario que agregar la función y arreglar el XLS.
Marc

+30, esto es lo que hace que este sitio sea genial (:
jwd

6

Esto puede sonar como un método de fuerza bruta, pero es la mejor manera que se me ocurrió. (Descubrí esta página cuando tuve la misma pregunta hace una hora ... podría pasar todo el día buscando, pero a veces es más fácil hacerlo y terminar con eso).

1) Copie y pegue solo las celdas que contienen los hipervínculos a una nueva hoja de cálculo.

2) Exporte la hoja de cálculo, haga clic en "Cambiar tipo de archivo", seleccione "Guardar como otro tipo de archivo" y guárdelo como una página web (también conocido como un archivo HTML).

3) Abra la página web en su navegador y vea la fuente.

4) Copie y pegue la fuente en un editor de texto.

5) Usando la función Buscar / Reemplazar del editor de texto, elimine el texto inicial y final de cada hipervínculo. (En otras palabras, reemplace dicho texto con nada: "") Tenga en cuenta que este texto debe ser idéntico para cada hipervínculo.

6) Ahora debería tener un archivo de texto con nada más que hipervínculos. Copie y pegue según sea necesario en su hoja de cálculo original o úselo como y donde lo desee.

Editado para indicar que realmente puede exportar a un archivo separado que es HTM. Cierre el archivo y vuelva a abrirlo en Excel nuevamente y resolverá el problema. La fórmula = Hipervínculo desapareció y los enlaces se convierten en enlaces regulares. Este método me ahorró horas y fue muy simple y no tuve que lidiar con scripts o fórmulas o VBA o Macros.


5

Utilizo una Mac y esto funcionó para mí: resalte la columna que necesita convertir, en el menú Insertar, abra "Hipervínculo". Elimine cualquier texto que aparezca en el cuadro Pantalla. Dirá "[varias celdas seleccionadas]" si el texto que se muestra es diferente en todas las celdas. Una vez que haga clic en Aceptar, solo aparecerán los enlaces en su hoja de trabajo. Si necesita convertir celdas individuales en lugar de una columna completa, resalte todas las celdas que necesita convertir, haga clic derecho, seleccione "editar hipervínculo" y siga los mismos pasos para eliminar el texto en el cuadro Pantalla.


Brillante. ¡Mucho más fácil que VBA!
Tom Auger

¡¡¡Este es un gran consejo!!!
FFrewin

1
Desafortunadamente, esto no pareció funcionar para mí en Windows (10), Excel (2016).
Kenny LJ

0

Estoy seguro de que existe con VBA, sin embargo, mientras tanto, haga clic derecho, H, y copie y pegue la dirección en la pantalla para mostrar el cuadro


0

En los años transcurridos desde que se hizo esta pregunta, Excel agregó la =GetURL(cell)función para que pueda hacerlo sin soltar su propio VBA.

Al usar nuestro sitio, usted reconoce que ha leído y comprende nuestra Política de Cookies y Política de Privacidad.
Licensed under cc by-sa 3.0 with attribution required.