Search code examples
vbaexcelexcel-2013

How can i run this excel script on all sheets ? Remove all hyperlinks in entire workbook


This is the script. It runs well on single sheet when i call via alt+8

However i want to run it in all sheets how can i do that ?

Ty very much

Here the macro

Sub RemoveHyperlinks()
ActiveSheet.Hyperlinks.Delete
End Sub

Basically i want to remove all hyperlinks in entire workbook

Ty very much


Solution

  • Code:

    Sub Test()
        Dim w as Worksheet
    
    For Each w in ThisWorkbook.Worksheets
        w.Hyperlinks.Delete
    Next
    
    End Sub