Hyperlink Renaming

Hello,

I was wondering if I could get some help with hyperlink validation renaming.

I currently have this working code:

Please Login or Register  to view this content.

What this code does is compare a list of hyperlinks which are named a number of digits to a file name using cells C2 and D2 in combination with the file names listed under col B.
If the hyperlink is valid, this program will keep the hyperlink active but rename the hyperlink name to "link"
If the hyperlink does not exist(does not point to a particular picture in the directory), it will disable the hyperlink and change the hyperlink name to "no link"

I was wondering if there was any way to keep the file name of the hyperlink and if the link does not exist, disable it change the hyperlink font color to black and make it not underlined.
This way the hyperlinks with photos are distinguished from the files without a photo.

I currently have the following code to hyperlink the file

Please Login or Register  to view this content.

As you can see, I have been naming the hyperlink the contents in B2
After this hyperlink validation code executes, I would like the contents of the hyperlink to still be named the contents in Col B


Thanks

Adding in a new variable to help with your link text in cell B2 as well, this should do it:

Please Login or Register  to view this content.

Sorry, my bad:

Please Login or Register  to view this content.

Also, here's a version that uses the text IN COLUMN B as the link text.

Please Login or Register  to view this content.