just use a foreach loop
here enumerable.Range(2,11) means start at row 2 and end at row 12
then in the vba call , change the parameter to this
also, change the macro.txt to this to handle cells with NO hyperlinks (will output “No Link” if cell has no hyperlink)
Function GetURL(cellAddress as string) As String
On Error goto ErrorHandling:
GetURL = Range(cellAddress).Hyperlinks(1).Address
Exit Function
ErrorHandling:
GetURL = "No Link"
End Function
macro.txt (194 Bytes)
test.xlsx (9.2 KB)
TestGetLink.xaml (7.4 KB)
