Share via

Excel macro to hide hyperlink address

Anonymous
2010-06-12T18:47:45+00:00

I would like a macro (or possibly an Excel setting?) that will hide/remove the hyperlink address window that appears on mouse-over. I want it to apply to all sheets in the workbook.

Any help would be greatly appreciated.

Tom

Microsoft 365 and Office | Excel | For home | Windows

Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.

0 comments No comments

Answer accepted by question author

Anonymous
2010-06-12T20:32:19+00:00

Thanks guys both of these solutions work. I tried both and prefer how Rick's solution apprears to the user. Since I have a very large workbook with many hyperlinks, is there a macro that would find all hyperlinks (all sheets) and then change the screen tip text similar to Rick's solution?

Really appreciate the help - Tom

Was this answer helpful?

1 person found this answer helpful.
0 comments No comments

Answer accepted by question author

Anonymous
2010-06-12T19:09:24+00:00

This little macro will make the mouse-over message ALMOST dissappear:

Sub marine()

For Each r In ActiveSheet.UsedRange

    If r.Hyperlinks.Count > 0 Then

        r.Hyperlinks(1).ScreenTip = " "

    End If

Next

End Sub


gsnu201004

Was this answer helpful?

1 person found this answer helpful.
0 comments No comments

Answer accepted by question author

Anonymous
2010-06-12T20:48:49+00:00

Here is a macro that loops over worksheets and puts a single space in each screentip.

Works for Inserted hyperlinks:

Sub dural()

Dim ws As Worksheet

For Each ws In Worksheets

    ws.Activate

    For Each r In ActiveSheet.UsedRange

        If r.Hyperlinks.Count > 0 Then

            r.Hyperlinks(1).ScreenTip = " "

        End If

    Next

Next

End Sub


gsnu201004

Was this answer helpful?

0 comments No comments

Answer accepted by question author

Anonymous
2010-06-12T19:18:09+00:00

You can also do this manually when you *insert* a hyperlink by clicking the ScreenTip button and entering a single space character into the "Screen Tip Text" field that appears. In XL2007, you can edit your existing hyperlink and to the same thing.

Was this answer helpful?

0 comments No comments

5 additional answers

Sort by: Most helpful
  1. Anonymous
    2010-06-12T21:54:58+00:00

    This macro should be a little quicker as it doesn't look at every cell in the UsedRange, rather, it iterates the hyperlinks directly...

    Sub ChangeHyperlinkTooltip()

      Dim ws As Worksheet, H As Hyperlink

      For Each ws In Worksheets

        For Each H In ws.Hyperlinks

          H.ScreenTip = " "

        Next

      Next

    End Sub

    One note, though... both Gary's Student's and my macros will only change the ScreenTip for hyperlinks that were inserted into the cell... if the hyperlink is the result of a formula using the HYPERLINK function, its ScreenTip will not be changed.

    Was this answer helpful?

    1 person found this answer helpful.
    0 comments No comments