¿como se eliminan los hipervinculos de todo un documento?

01/07/2006 - 01:35 por Mari | Informe spam
Quiero eliminar todos los hipervinculos pero de una sola vez, se puede?
 

Leer las respuestas

#1 Vinchenzo vinç
01/07/2006 - 02:53 | Informe spam
"Mari" escribió en el mensaje news:
Quiero eliminar todos los hipervinculos pero de una sola vez, se puede?



Hola Mari,
puedes eliminarlos todos a la vez si tu intención es eliminar el hipervínculo, pero conservando su texto:
Sheet(Name|Index).Hyperlinks.Delete

Si no me equivoco no existe un método para eliminarlos todos a la vez si la intención es eliminar también el texto. Pero sí
puedes recorrer la colección de hipervínculos de una hoja, y limpiar el contenido de la celda correspondiente a cada hipervínculo:

'******************
Dim objLink As Hyperlink

For Each objLink In ActiveSheet.Hyperlinks
objLink.Range.ClearContents
Next
'******************


Saludos
( ! ) Respuestas precedentes en Google:
http://tinyurl.com/rkce5
( i ) Temperancia en el foro:
http://tinyurl.com/mawnn

Preguntas similares