VBA Add Hyperlink to Cell on Specific Sheet

Having an issue with the code below:

Please Login or Register  to view this content.

It is supposed to automatically add the text to cell "D5" on "sheet2" when the user types something in the TextBox on the userform. The field is used for a web link. So it also makes the cell into a Hyperlink. The problem is it does not add the text to "sheet2"... It adds it to "sheet1". Think it has to do with the code for the hyperlink. Not sure though.

For example, same thing as above (but without the hyperlink):

Please Login or Register  to view this content.

This example works perfectly. I have been searching for a while and can not seem to find how to make this work. Is there another way I can format the VBA to accomplish this?

Currently defaulting to the active sheet
Try:

Please Login or Register  to view this content.

scottaz
Administrative Note:

Welcome to the forum.

We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(Note: this change is not optional. No help to be offered until this moderation request has been fulfilled.)