Saltar al contenido principal

¿Cómo convertir el texto de la URL a un hipervínculo en el que se puede hacer clic en Excel?

Supongamos que tiene varias URL en su hoja de trabajo, pero que no están vinculadas, y ahora necesita convertir todas las URL no vinculadas en hipervínculos en los que se puede hacer clic, como se muestra a continuación. Por supuesto, puede hacer doble clic en ellos uno por uno para que se pueda hacer clic en ellos, pero esto llevará mucho tiempo si hay muchas URL. ¿Cómo podría convertir varias URL no vinculadas en hipervínculos en los que se puede hacer clic automáticamente en Excel?


flecha azul burbuja derecha Convierta el texto de la URL en un hipervínculo en el que se puede hacer clic con el código VBA

Parece que no hay otra forma efectiva de resolver este problema en Excel, excepto usando el siguiente código VBA.

1. Seleccione el rango de texto de la URL que desea convertir en hipervínculos en los que se puede hacer clic.

2. Mantenga pulsado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

3. Hacer clic recuadro > Móduloy pegue el siguiente código en la ventana del módulo.

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. Entonces presione F5 para ejecutar el código, un cuadro de diálogo emergente para que seleccione un rango, luego haga clic en OKy las URL no vinculadas seleccionadas se han convertido en hipervínculos en los que se puede hacer clic. Ver capturas de pantalla:

2

flecha azul burbuja derecha Convierta el texto de la URL en un hipervínculo en el que se puede hacer clic con Kutools para Excel

Tal vez, el código VBA es algo difícil para usted, aquí, puedo presentarle una herramienta multifuncional-Kutools for Excel, Con su Convertir hipervínculos característica, puede manejar rápidamente las siguientes operaciones:

  • Extraiga direcciones reales de hipervínculos;
  • Convertir el texto de la URL en un hipervínculo en el que se puede hacer clic
Kutools for Excel : con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 30 días

Si tienes instalado Kutools for Excel, haga lo siguiente:

1. Seleccione el rango de texto de la URL que desea convertir en hipervínculos en los que se puede hacer clic.

2. Hacer clic Kutools > Enlace > Convertir hipervínculos, ver captura de pantalla:

3. En la Convertir hipervínculos cuadro de diálogo, seleccione El contenido de la celda reemplaza las direcciones de los hipervínculosY haga clic en botón-doc1 botón de Rango de resultados para especificar una celda para poner el resultado.

4. Y luego haz clic OK, todos los enlaces de texto sin formato seleccionados se han convertido en hipervínculos en los que se puede hacer clic. Ver captura de pantalla:

Notas:

1. Si desea poner las direcciones reales en el rango original, verifique Convertir rango de fuente.

2. Si el hipervínculo está vinculado al documento actual, marque Los hipervínculos son un lugar en este documento .

Haga Clic en Convertir hipervínculos para saber más sobre esta función.

¡Descargue y pruebe Kutools para Excel ahora!


flecha azul burbuja derecha   Demostración: convierta el texto de la URL en un hipervínculo en el que se puede hacer clic con Kutools para Excel

Kutools for Excel: con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 30 días. ¡Descarga y prueba gratis ahora!

Artículo relacionado:

¿Cómo extraer direcciones reales de hipervínculos en Excel?

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo.  Haga clic aquí para obtener la función que más necesita...

Descripción


Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
Comments (17)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Дай бог здоровья, вам, вашим матерям и детям, первенца в честь автора назову
This comment was minimized by the moderator on the site
Muito bom, só uma dúvida, existe a possibilidade de deixar um intervalo fixo já na macro (sem precisar aparecer aquele pop-up pra selecionar o intervalo), tipo clico pra excutar a macro e ele pega o intervalo que já está configurado na macro e ativa os links, pulando a etapa de ter que clicar em ok e tals. Se puderem me ajudar com esse dúvida serei grato.
This comment was minimized by the moderator on the site
Hello, Tosetti

To solve your problem, please apply the below code: (First, you should select the hyperlink texts)

Sub ConvertToHyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
Set WorkRng = Application.Selection
For Each Rng In WorkRng
    Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub

Please try it, hope it can help you!
This comment was minimized by the moderator on the site
Oh crap.... it broke my Excel. By mistake I selected entire column and it forze for... ages!!
This comment was minimized by the moderator on the site
hi
when i click on the hyperlink .. it wont take to me to email page ( as an Outlook or Gmail) Please support
This comment was minimized by the moderator on the site
Hello, Babu,
May be the below article can help you for solving your problem, please view it:
https://www.extendoffice.com/documents/excel/3304-excel-convert-email-to-hyperlink.html

Hope it can help you!
This comment was minimized by the moderator on the site
I had to switch nearly 55,000 cells from plain text to hyperlinks. This helped me cut the time down from "the rest of my natural life" to five minutes. Thank you!
This comment was minimized by the moderator on the site
This is very helpful...Thanks
This comment was minimized by the moderator on the site
This is Great! Worked like a charm
This comment was minimized by the moderator on the site
Man! This is so awesome, I've spent so long trying to find an easy way and this took seconds! Works great!!!
This comment was minimized by the moderator on the site
Thanks a lot my friend! it worked! :lol:
This comment was minimized by the moderator on the site
The code almost works, but author has left a small copy-paste error. You need to remove "" from the first line, and "" from the last line, and then it will work. Cheers.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations