How to create auto increment hyperlinks in excel?

Hello I'm a beginner in using excel.

My objective is to download thousands of product images from my client site and make them transparent.
They have provided me product codes and I have found out that they are using the same code in the link for that particular product.
Is there any easy way to create increment links like
myclientswebsite[dot]com/products/tv/5478-tv
myclientswebsite[dot]com/products/tv/5479-tv
myclientswebsite[dot]com/products/tv/5480-tv

I'm dying doing this since i have another set to do which has thousands of images.
A million thanks in advance.

Maybe a small macro.

Select an empty sheet, Press Alt-F11 to open the VBE. From the Menu/Ribbon, Insert a new module. Copy and paste the code below.

Change the value of the MaxRows to whatever you need, currently 1000.
Change the value of the HLStart to whatever you need, currently 5477.

Click anywhere between the Sub and End Sub and press F5 to run the code.

It creates the hyperlinks but I can't test it because I don't have the real links, etc. Anyway, give it a go, see how far you get.

Option Explicit

Sub CreateHyperlinks()

Dim i As Long
Dim MaxRows As Long: MaxRows = 1000
Dim HLStart As Long: HLStart = 5477

Range("A1").Select
For i = 1 To MaxRows
    With Range("A" & i)
        .FormulaR1C1 = _
            "=""myclientswebsite[dot]com/products/tv/""&ROW(RC)+" & HLStart & "& ""-tv"""
        ActiveSheet.Hyperlinks.Add _
            Anchor:=Range(.Address), _
            Address:= _
                .Text
    End With
Next 'i
End Sub

Interesting though the picture is, the redacting is self defeating. I am left to guess what is in there and what might be causing the problem.

I suspect that you may have spaces in there, where you didn't in the sample you quoted above. In that case, you'll probably need to put single quotes in there somewhere "to hold it together". But that's just a guess. Or maybe change spaces to %20. How secret is a web address?

Regards, TMS

You're welcome. What did you have to do to fix it?


If you are satisfied with the solution(s) provided, please mark your thread as Solved.


New quick method:
Select Thread Tools-> Mark thread as Solved. To undo, select Thread Tools-> Mark thread as Unsolved.

Or you can use this way:

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save

You're welcome. Thanks for the rep.