Tabla de contenido
Eliminar todos los hipervínculos de una hoja
El siguiente código elimina todos los hipervínculos de Sheet1:
12345 | Sub DeleteHyperLinks ()Sheet1.Hyperlinks.DeleteEnd Sub |
Y si no necesita una rutina secundaria reutilizable, sino una solución única, use la ventana Inmediato:
1. Seleccione la hoja de la que desea eliminar los hipervínculos.
2. Presione Alt + F11 para abrir el VBE
3. En el menú principal de VBE, elija Ver-> Ventana inmediata
4. En la ventana Inmediato, pegue el siguiente código y luego presione Enter.
1 | ActiveSheet.Hyperlinks.Delete |