Follow Hyperlinks wih Workbook structure protected

This can be done using "fake" links. Details in the attachment.

Artik

Thank you very much @Artik!

One question: what does this code: Set rng = Range(Target.Range.Offset(, -1).Hyperlinks(1).SubAddress)? What does that -1 and that 1 mean? Thank you a lot.

Target is the hyperlink that has been clicked on.
Target.Range is the cell reference of this hyperlink.
Target.Range.Offset (, -1) is the reference of the cell shifted one column to the left.
Target.Range.Offset (, -1).Hyperlinks(1).SubAddress - this computed cell contains a real link, we get the address from it. The return address is like: Sheet3!A1

BTW.
Replace this line

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

Artik

Thank you! One last question: How do you manage to when you pass with the cursor in cell B2 of tab index, it appears "Go to Sheet2" and in cell B3 "Go to Sheet3"?
Thanks

Edit hyperlink and...

Artik

This is because cells are merged.
In Workbook_SheetFollowHyperlink replace line:

Please Login or Register  to view this content.

Artik

That makes sense! It worked. Thank you for all your help!

Something made me dizzy in those days. There is no need to create a column with fake links.
And the code in the ThisWorrkbook module should be changed to:

Please Login or Register  to view this content.

Plus Workbook_SheetDeactivate unchanged.

Sorry.

Artik