Open each hyperlink in new IE tab

[sharky12345]

I'm using this to loop through cells containing hyperlinks to websites and if criteria is met open that page;

Application.DisplayAlerts = FalseFor Each Cell In Sheet11.Range("J2:J19")
If Cell.Value = "YES" Then
If Cell.Offset(0, 3) > 13 Then
ThisWorkbook.FollowHyperlink Cell.Offset(0, -7)
Cell.Offset(0, 2).Value = Format(Now, "dd/mm/yyyy")
End If
End If
Next
Application.DisplayAlerts = True

This works, but it opens each hyperlink in the same window, so the result is that I only get left the last page it has opened.

Is there a way I can get it to open each link up in a new window/tab?

 

[Domenic]

First, make sure that you check/select 'A new tab in the current window' under...

Internet Options >> Tabs >> Tabbed Browsing Settings >> Open links from other programs in

Then set the argument for NewWindow in FollowHyperlink to True...

ThisWorkbook.FollowHyperlink Address:=Cell.Offset(0, -7), NewWindow:=True

Hope this helps!

 

[sharky12345]

Thanks Domenic, will give this a try.