VBA Macro for Making a Cell a Hyperlink with URL from the Cell Beside It

[danimorning]

Hi! I am hoping my description of what I need makes sense. If not, I am happy to elaborate!

Let's say Column A has the title of documents and column B has the document's unique URL. I am trying to figure out if it is possible to create a macro that automatically makes the cell in column A a hyperlink with the URL from its neighboring cell in column B. So, cell A1 would be hyperlinked to the URL in B1, etc. etc. I used to just insert hyperlink, but now I have over 150 in each column, so I am hoping to find a way to automate it. Any help would be so appreciated -- thanks!

 

[The_Macrotect]

Hello,

Try this on a copy of your work:

Sub create_hyperlinks()
Dim x As Integer, text As String

For x = 1 To 329
text = Cells(x, 1).Value
ActiveSheet.Hyperlinks.Add Cells(x, 1), Address:=Cells(x, 2).Value, TextToDisplay:=text
Next x

End Sub

Change the line "For x=1 To 329" to the range in column A that contains your titles.

 

[danimorning]

Perfect! Endless thanks!