VBA to format font color in a hyperlinked cell if selected

[Tmoske]

Good afternoon,
I need help with a simple macro to change the font color in a hyperlinked cell after it has been selected. This way the cell would indicate that it has already been selected. I have many sheets with hyperlinks and would like it to only work on "Sheet 1" for example.

Thanks so much,
Tmoske

 

[Jerry Sullivan]

Hi Tmoske,

The default behavior is for the font to change - is that not happening for you on Sheet1?
... or is your challenge to not change the font color of followed hyperlinks on the other sheets?

The cell format of a hyperlinks before and after being clicked can be controlled by Cell Styles.
For xl2007 and later go the Ribbon > Styles group > Cell Styles
Right-click on Followed Hyperlink > Modify... > then change that styles appearance properties to what you want.

If you are only trying to reset that default behavior, you shouldn't require VBA to do that.

 

[Tmoske]

I had no idea it was going to be that simple. This does the trick very well. Thank you for your help.