Excel, come eliminare collegamenti da celle selezionate?

[ghisirds]

Ciao a tutti.
Mi trovo spesso con dei fogli elettronici fatti da altri con elenchi di celle, visivamente tutte uguali, ma alcune contenenti dei collegamenti ipertestuali.
Allora mi domandavo: non esiste una macro che automaticamente cancella tutti i collegamenti iperestuali da una selezione di celle? Ovvio che non deve dare errore se nella selezione vi sono delle celle senza collegamenti, ma deve proseguire fino all'ultima cella!
Grazie mille dell'aiuto
Marco

[Alexsandra]

prova con questo codice

Sub rimuovi_hyperlink()
Range(Range("A1"), ActiveCell.SpecialCells(xlLastCell)).Select
Selection.Hyperlinks.Delete
[A1].Select
End Sub

si calcola da solo l'area in cui ci sono delle celle non vuote e rimuove il collegamento.

la puoi associare ad un tasto oppure ad una combinazione di tasti

[ghisirds]

il problema è che però così facendo lo toglie in tutto il foglio quando invece, magari c'è una colonna in cui li si vuole lasciare...!!

[Alexsandra]

Sub rimuovi_hyperlink()
Selection.Hyperlinks.Delete
[A1].Select
End Sub

così selezioni quello che vuoi e cancelli i links presenti nella tua selezione

[ghisirds]

Inviato da Alexsandra

Sub rimuovi_hyperlink()
Selection.Hyperlinks.Delete
End Sub

così infatti va benissimo, ma ho tirato va anche
[HTML][A1].Select[/HTML]

grazie mille
marco