Eliminar todos los hipervínculos de una hoja Excel

Compatibilidad: Excel 365 2021 2019 2016

En ocasiones tenemos que eliminar todos los hipervínculos de una hoja Excel, para ello, tendríamos que eliminar uno a uno todos ellos.

Mediante una macro, podemos quitar todos los hipervínculos de una vez, manteniendo su texto existente.
  1. Con Excel abierto.

  2. Pulsar la tecla Alt y mantener pulsada / Pulsar la tecla F11. Mostrará el editor de Visual Basic.

  3. Ir a: Barra de Menú / Insertar / Módulo. Mostrará la ventana del módulo donde escribimos la macro.

  4. Escribir el código de la macro:

    Sub Elimina_Hipervinculos()

    Do Until ActiveSheet.Hyperlinks.Count = 0
    ActiveSheet.Hyperlinks.Delete
    Loop

    End Sub

  5. Guardar el libro con la extensión *.xlsm. Libro habilitado para macros.

  6. Insertar varios hipervínculos y reproducimos la macro para eliminar todos los hipervínculos.

Eliminar todos los hipervínculos de una hoja Excel: Rango A2:A4 con hipervínculos y sin ellos.

Mediante la macro, podemos eliminar todos los hipervínculos de una hoja.

Nivel de dificultad: Experto VBA-Macros Excel Experto VBA - Macros

7 comentarios en “Eliminar todos los hipervínculos de una hoja Excel

  • Excelente ! Me sirvio muchisimo, funciona a la perfecciona esa macro. Lo hice en Excel 2007. Muchas gracias me ahorraste un trabajo de horas ! saludos

  • buenas tardes, al ingresar esa macro no me borro el hipervinculo pero si me genero dificultad para activarlos en pantalla completa, los hipervinculos que me mandan a hojas dentro del libro no siguen su ruta si esta en pantalla completa no se como solucionarlo...

  • Buenos días:
    Muy útil, muchas gracias!
    Sabrías cómo hacer lo mismo en un documento de Word?
    Muchas gracias.
    Un saludo.

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Este sitio usa Akismet para reducir el spam. Aprende cómo se procesan los datos de tus comentarios.