how to add range value to link in vba

Question

i would like to add range value to my link but it is doesn't work some one can help how can i add range value to the link please? thanks a lot

    Dim iLink
    Dim myUrl
    Dim Number
    
    i = 7
    Number= Range("D" & i).Value
    myUrl = "https://www.google.com/Number"

    While Range("D" & i).Value <> ""
    iLink = myUrl & Range("D" & i).Value

    ActiveSheet.Hyperlinks.Add _
    Anchor:=Range("D" & i).Offset(, 1), _
    Address:=iLink
    i = i + 1
    Wend

i mean no error but the link opened is google.com instead of google.com/123 — satcha
– satcha, Commented Jun 17, 2022 at 18:45
Change myUrl = "https://www.google.com/Number" to myUrl = "https://www.google.com/. — findwindow
– findwindow, Commented Jun 17, 2022 at 18:47

JoeStar · Accepted Answer · 2022-06-17 18:43:04Z

3

You can do it like this

myUrl = "https://www.google.com/" & Number

Because you enclosed your variable 'Number' inside double quotes, vba counted it as a string, not a variable.

answered Jun 17, 2022 at 18:43

JoeStar

831 silver badge7 bronze badges

Sign up to request clarification or add additional context in comments.

3 Comments

findwindow Over a year ago

iLink = myUrl & Range("D" & i).Value would duplicate.

JoeStar Over a year ago

@findwindow yeah that's correct, but what if he wants it to duplicate it 😅, our both answers are correct depending on if he wants it to duplicate it or not.

findwindow Over a year ago

Yea, his comment says google/123 but clearly he wants google/123/123

Collectives™ on Stack Overflow

how to add range value to link in vba

1 Answer 1

3 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

3 Comments

Your Answer

Sign up or log in

Post as a guest

Related