cycle through hyperlinks in column b

[SteveC]

This macro doesn't work. It's supposed to follow the hyperlinks on each row
on columnn b. I get the following error: "Run-time error '9': Subscript
out of range"

any suggestions? thanks...

Sub FollowHyperlinks()
Dim c As Range
For Each c In ActiveSheet.Range("b11:b200")
c.Hyperlinks.Item(1).Follow
Next
End Sub

 

[Gary''s Student]

Your posted code should work if the range is fully packed with hyperlinks.

 

[SteveC]

thanks gary -- the data in column b are actually formulas that reference
column a:

cell B15: =hyperlink(A15)

data in Column B are actually Internet URLs made with customized concatenate
formuals -- they are orders to a website. I don't want to actually open up a
webpage on my Internet browser, I just want to send the orders to a website.

I thought automaticlly having VBA "click" on hyperlinks in column b would be
the way to do it, but I think I was wrong about that. thanks...