Remove Hyperlinks
Sub RemoveLinks()
Dim ThisSheet as Worksheet, ThisLink as Hyperlink
For Each ThisSheet in ThisWorkbook.Worksheets
For Each ThisLink in ThisSheet.Hyperlinks
ThisLink.Delete
Next ThisLink
Next ThisSheet
End Sub
--
- K Dales
"dthmtlgod" wrote:
I have a couple of workbooks that have hyperlinks scattered throughout the
worksheet (many worksheets). Can I programtically remove all these with a
macro?
|