How to Link a hyperlink'd text to another button while button and hyperlink'd text are in same cell

[Ansys_Excel]

1. I have a text "test" in cell "A1" in "sheet1" which is hyperlink'd to a hidden sheet "sheet2". I have sheet code sub in "sheet1" "worksheet_followhyperlink" which allows me to click the text "test" to unhide & select "sheet2".
2. I have created a button on top of hyperlink'd text "test" in sheet1 cell"A1", it has its own name & caption. I have created 2nd sub "button_click" in "sheet1" & pressing button basically to call sub "worksheet_followhyperlink" . I am getting error upon pressing the button as "complie error: Argument not optional". Pls advise how to assign button to hyperlink button so that once I press the button should make hyperlink text to work which is in same cell as button.

 

[AlphaFrog]

Hi and welcome to the forum.

Try something like this for the CommandButton_Click procedure.

[color=darkblue]Private[/color] [color=darkblue]Sub[/color] CommandButton1_Click()
    [color=darkblue]With[/color] Range("A1")
        Worksheet_FollowHyperlink .Hyperlinks(1)
        .Hyperlinks(1).Follow
    [color=darkblue]End[/color] [color=darkblue]With[/color]
[color=darkblue]End[/color] [color=darkblue]Sub[/color]