Hyperlinks toevoegen aan aantal rijen in een excel bestand

[Evelthoven]

Goedemiddag,

In de bijlage heb ik mijn vraag gesteld.

Ik ben benieuwd of het mogelijk is een groot aantal hyperlinks in één keer toe te voegen.

Bedankt voor de reacties.

Gr.
Eric

 

[SjonR]

zo?

Sub SjonR()
For i = 3 To Range("B" & Rows.Count).End(xlUp).Row
    Blad1.Hyperlinks.Add Cells(i, 2), "", Cells(i, 2).Value, , Cells(i, 2).Value
Next
End Sub

 

[edmoor]

Bijvoorbeeld:

=HYPERLINK(B3;B3)

 

[Evelthoven]

Bedankt SjonR en Edmoor, mijn probleem is opgelost.