Skip to main content

¿Cómo seleccionar y copiar todos los hipervínculos de un documento de Word?

Author: Sun Last Modified: 2025-06-03

Si tienes un documento de Word largo con múltiples hipervínculos y necesitas copiarlos todos a la vez, seleccionar cada uno manualmente puede ser muy laborioso. Afortunadamente, existen métodos eficientes para extraer y copiar todos los hipervínculos o solo sus direcciones. Esta guía te presentará diferentes métodos para lograrlo rápidamente.


Copiar todos los hipervínculos a un nuevo documento usando VBA

Usando VBA, puedes extraer todos los hipervínculos de un documento y copiarlos en un nuevo documento.

  1. Abre el documento de Word que contiene los hipervínculos y presiona Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
  2. Haz clic en Insertar > Módulo, luego copia y pega el siguiente código VBA en la ventana del módulo:
    Sub HyperlinksExtract()
    'Updateby20140214
        Dim oLink As Hyperlink
        Dim docCurrent As Document 'current document
        Dim docNew As Document 'new document
        Dim rngStory As StoryRanges
        Set docCurrent = ActiveDocument
        Set docNew = Documents.Add
        For Each oLink In docCurrent.Hyperlinks
            oLink.Range.Copy
            docNew.Activate
            Selection.Paste
            Selection.TypeParagraph
        Next
        
        Set docNew = Nothing
        Set docCurrent = Nothing
    End Sub
    
  3. Haz clic en el botón Ejecutar para ejecutar el código VBA. Se abrirá un nuevo documento que contendrá todos los hipervínculos del documento original.
    Document with text with hyperlinks >>> New document with only text with hyperlinks

Nota: Este método VBA solo funciona para hipervínculos basados en texto. No extrae hipervínculos incrustados en imágenes.


Extraer solo las direcciones de los hipervínculos (texto plano) a un nuevo documento usando VBA

Este método VBA extrae solo las direcciones de los hipervínculos de un documento y las pega en un nuevo documento.

  1. Abre el documento de Word y presiona Alt + F11 para abrir el editor de VBA.
  2. Haz clic en Insertar > Módulo, luego copia y pega el siguiente código VBA:
    Function GetAllHyperlinks()
    'Updateby20140214
        Dim docCurrent As Document
        Dim docNew As Document
        Dim oLink As Hyperlink
        Dim rng As Range
        Application.ScreenUpdating = False
        Set docCurrent = ActiveDocument
        Set docNew = Documents.Add
        For Each oLink In docCurrent.Hyperlinks
            Set rng = docNew.Range
            rng.Collapse
            rng.InsertParagraph
            rng.InsertAfter (oLink.Address)
        Next
        docNew.Activate
        Application.ScreenUpdating = True
        Application.ScreenRefresh
    End Function
    
  3. Haz clic en el botón Ejecutar Se creará un nuevo documento que contendrá solo las direcciones de los hipervínculos (texto plano).
    Document with text with hyperlinks >>> New document with only hyperlink addresses

Nota: Las direcciones de los hipervínculos extraídas pueden no aparecer en el mismo orden que en el documento original.


Copiar hipervínculos o direcciones al portapapeles usando Kutools para Word

Kutools para Word proporciona una manera sencilla de copiar todos los hipervínculos o solo sus direcciones al portapapeles con unos pocos clics.

Kutools para Word,equipado con inteligencia artificial 🤖, ofrece más de 100 funciones prácticas para simplificar tus tareas.
  1. Haz clic en Kutools Plus > Copiar hipervínculo.
    Copy Hyperlink button on the Kutools tab on the ribbon
  2. En el cuadro de diálogo Copiar todos los hipervínculos al portapapeles, selecciona la opción deseada.
    Copy all hyperlinks to clipboard dialog box
  3. Pega los hipervínculos copiados donde quieras presionando Ctrl + V.
  • Si seleccionas la opción Hipervínculos se copiarán tanto el texto visible como el hipervínculo.
    Text with hyperlinks pasted
  • Si seleccionas la opción Direcciones de los Hipervínculos solo se copiará la dirección del hipervínculo como texto plano.
    Hyperlinks addresses pasted
Kutools para Word es el complemento definitivo para Word que agiliza tu trabajo y potencia tus habilidades de procesamiento de documentos. ¡Consíguelo ahora!

Demostración: Copiar Todos los Hipervínculos en un Documento de Word

Descubra la pestaña Kutools / Kutools Plus en este video de Kutools for Word. Disfrute de 100+ funciones y utilidades de IA permanentemente gratuitas. ¡Descárguelo ahora!


¡Navegación y edición con pestañas para varios documentos de Word/libros de Excel, tal como en Chrome y Edge!

Al igual que al navegar por varias páginas web en Chrome, Safari y Edge, Office Tab te permite abrir y gestionar múltiples documentos de Word o libros de Excel en una sola ventana de Word o Excel. ¡Cambiar entre documentos o libros ahora es sencillo con solo hacer clic en sus pestañas!

¡Prueba Office Tab gratis ahora!


Artículos Relacionados:

Las mejores herramientas de productividad para Office

Kutools para Word - ¡Mejora tu experiencia en Word con más de 100 funciones excepcionales!

🤖 Funciones de IA de Kutools: Asistente de IA / Asistente en Tiempo Real / Super Pulir (Mantener formato) / Super Traducir (Mantener formato) / Redacción AI / Revisión con IA...

📘 Dominio de Documentos: Dividir páginas / Combinar documentos / Exportar selección en varios formatos (PDF/TXT/DOC/HTML...) / Convertir en lote a PDF...

Edición de Contenido: Buscar y reemplazar en lote en varios archivos / Redimensionar todas las imágenes / Transponer filas y columnas de tabla / Convertir tabla a texto...

🧹 Limpieza sin esfuerzo: Elimina espacios extras / saltos de sección / cuadros de texto / hipervínculos / Para más herramientas de eliminación, visita el grupo Eliminar...

Inserciones creativas: Insertar separadores de miles / Casillas de verificación / Botones de opción / Código QR / Código de Barras / Varias imágenes / Descubre más en el grupo Insertar...

🔍 Selecciones precisas: Selecciona páginas específicas / Tablas / Formas / Párrafos de Encabezado / Mejora la navegación con más funciones de Seleccionar...

Mejoras destacadas: Navega a cualquier ubicación / Inserta automáticamente texto repetitivo / Cambia entre ventanas de documentos /11 herramientas de conversión...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 ¿Quieres probar estas funciones? ¡Descarga Kutools para Word ahora! 🚀
 

Las mejores herramientas de productividad para Office

Kutools para Word - ¡Más de 100 herramientas para Word!