Building Hyperlink from Cell Text... 2

BFreshour · Sep 16, 2003

Trying to build a hyperlink using the text in a cell. For instance:

A4 = JoeBlow

So in cell A5, I have the following:

=CONCATENATE("

This just creates a text cell with:

Anyway to make that a link with a label different than the full URL?

SkipVought · Sep 16, 2003

Hi,

The only way I know on the sheet is to Edit Hyperlink.

But...

in VBA...

Code:

    For Each hlk In ActiveSheet.Hyperlinks
        With hlk
            .TextToDisplay = .Parent.Offset(0, -1).Value
        End With
    Next

Hope this Helps

Skip,
Skip@TheOfficeExperts.com

ETID · Sep 17, 2003

=HYPERLINK("

where a1 =

TonyJollans · Sep 17, 2003

Hi BFreshour,

ETID has exactly the right idea but he missed off the important bit!

Code:

=HYPERLINK(&quot;[URL unfurl="true"]http://&quot;&A1[/URL]

Code:

,&quot;Pretty text for User&quot;

Code:

Enjoy,
Tony

BFreshour · Sep 17, 2003

I ended up using the following macro code and ran it on every cell I needed:

Dim link As String

With ActiveCell(1)
link = "

& ActiveCell(1).Offset(-1, 0).Value & "&Sport=NCAAF"
.Hyperlinks.Add .Range("A1&quot

, link, , , "Bets"
.Font.Size = 7.5

End With

---
But this also works:

=HYPERLINK("

&I9 & "&Sport=NCAAF","Bets&quot

Thanks,
Brad