'_______________________________________________
'
' Use this VBA macro for Excel to
' remove a hyperlink in a column
'_______________________________________________
'
Sub Remove_Hyperlinks_From_Cells()
Dim The_First_Row, The_Last_Row As Long
The_Last_Row = Cells.SpecialCells(xlCellTypeLastCell).Row
For The_First_Row = 1 To (The_Last_Row + 1)
Range("A" & The_First_Row).Copy
Selection.Hyperlinks.Delete
Range("A" & The_First_Row).PasteSpecial
Application.CutCopyMode = False
Next
End Sub
No comments:
Post a Comment
You may comment or show me other VBA tricks, but don't rest assured I'll always reply because I only have 24 hours in a day's hard work, and only a few minutes a week to update this blog... I'll try my best though...