Eliminar Hipervínculos de celdas con macros

En la entrega pasada aprendimos a crear desde Macros Excel, Hipervínculos en celdas. Recordemos que los Hipervínculos son elementos que podemos aprovechar para hacer link a una página de Internet donde el usuario pueda consultar más acerca de la información que estamos presentando en la hoja. De esto se trata la Propiedad Hyperlinks.

Propiedad Hyperlinks: Con la aplicación de este método, es posible configurar Hipervínculos directamente sobre una celda.

Ahora que ya sabemos cómo adicionar un Hipervínculo sobre una celda, veamos ahora como eliminarlo con el uso de Macros; asi que podemos continuar trabajando con el archivo de la entrega anterior, y la idea es que sobre el Hipervínculo de la celda A2 donde tenemos el texto Gerencie.com que se ingresó con macros, es necesario borrarlo. Así que vamos a ingresar al editor de Visual Basic, puede ser con la combinación de teclas Alt + F11 y desde el explorador de proyectos, es necesario dar doble clic sobre la hoja donde se requiere tener la macro que para nuestro ejercicio se ubicará en la Hoja3 al final de las macros que tenemos allí.

Ingresamos el siguiente código:

Sub BorrarHipervinculo()

Range("A2").Hyperlinks.Delete

End Sub

Queda de la siguiente manera en el editor VBA:

Veamos lo que significan cada una de las líneas:

  1. La primera línea Sub BorrarHipervinculo (), indica el inicio de la macro.
  2. En la segunda línea utilizamos del Objeto Range haciendo referencia a la celda sobre la cual se tiene configurado un Hipervínculo que en este caso se trata de la celda A2; luego sobre la Propiedad Hyperlinks, se activa el Método Delete para eliminar este Hipervínculo.
  3. La última línea marca el fin (End) de la Macro o Subrutina (Sub).

Para ejecutar la macro, lo ideal es insertar una autoforma en la Hoja y luego asignar la macro que acabamos de crear (clic derecho sobre la Autoforma y seleccionar la opción Asignar macro.

Finalmente seleccionar la macro que se acaba de crear  y al dar clic sobre el la autoforma, se elimina el Hipervínculo que se tenía en la celda A2.

Descargar archivo de trabajo.

Contenido relacionado:
Compartirlo
Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.


Déjenos su opinión

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc., pero debe hacerlo con respeto, sin insultar y sin ofender a otros.

Información legal aplicable para Colombia.