Opening Hyperlinks
 

Can someone please tell me if there is a keyboard shortcut I can use
to open multiple hyperlinks in a spreadsheet (Column B, row 2-2535).

Alternatively, I know I can write a macro with a keyboard shortcut -
if anyone knows how to write it and could post, I'd really appreciate
it.

Thanks

Opening Hyperlinks
 

Assign a shortcut key to the following:

Sub hyper_gone_wild()
Dim r As Range
Set r = Range("B2:B2535")
For Each rr In r
If rr.Hyperlinks.Count 0 Then
For Each hl In rr.Hyperlinks
ActiveWorkbook.FollowHyperlink Address:=hl.Address
Next
End If
Next
End Sub
--
Gary''s Student - gsnu2007


"Nicki" wrote:

Can someone please tell me if there is a keyboard shortcut I can use
to open multiple hyperlinks in a spreadsheet (Column B, row 2-2535).

Alternatively, I know I can write a macro with a keyboard shortcut -
if anyone knows how to write it and could post, I'd really appreciate
it.

Thanks