Hyperlink covers several cells, how to make it linkable from any of

[xenios]

Hello.
I have a link in cell A5, but it covers another 3-4 rows.
How to merge the columns, so it would work clicking only part of the expression?

Below are initial

Initial vba for the link creation if it helps. I have 3 of them of different type. and in attachment how it looks at the moment.
Here is the 1st one.
Sub Hyper()
Dim ws As Worksheet

For Each ws In ActiveWorkbook.Worksheets
If ws.Name <> "HOTELS" Then
ws.Hyperlinks.Add _
Anchor:=ws.Range("B5"), _
Address:="", _
SubAddress:="HOTELS!A1", _
TextToDisplay:="Back To The Hotel List"
End If
Next ws
MsgBox ("Completed")
End Sub

 

[xenios]

Not your fault, it's mine. We choose what we get involved in ?


Then you just have an hyperlink.
Turn on the macro recorder and carry out the actions in the section "Find All Hyperlinks Linked to Specific Text in Excel" in the link below

How to Quickly Find Hyperlinks in Excel (using Find and Replace)

In this tutorial, you'll learn how to use Find and Replace to quickly find hyperlinks in Excel. You can find all the hyperlinks or the ones that contain a specific text.

trumpexcel.com

Then at the bottom of the code add the lines

    Dim Findrange As Range
    Set Findrange = Columns("A:A").Find("Back to The Hotel List", , xlValues, xlWhole, xlByRows, xlNext, False)
    If Not Findrange Is Nothing Then Findrange.Resize(, 4).merge

and test. Remember when you put it in your loop you need to add the WS. to the range.

Then do the same with the other word, changing the word and the column in the code (make sure that your wording in the find is correct as your image just shows "Top" not "To the Top").

Works!!!!!!!!

 

[MARK858]

You're welcome