Link Column Cells in Excel with VBA Macro

link_column.vba

Sub my_macro() ' Macro is named after the function

  For Each cell in ActiveSheet.Range("A1:A30")
  
    ActiveSheet.Hyperlinks.Add cell, "https:/example.com" & cell.Value
    
  Next

End Sub


' https://learn.microsoft.com/en-us/office/vba/api/excel.application.activesheet

' https://learn.microsoft.com/en-us/office/vba/api/excel.range(object)

' https://learn.microsoft.com/en-us/office/vba/api/excel.hyperlinks.add