Range, Opening Multiple URL Simultaneously

[Stonesteel]

Greetings!

I am using Office 2007.. in my continuation of my project that i started yesterday. (http://www.mrexcel.com/forum/showthread.php?t=541754). I'm now in the final phase of the project, opening multiple URL simultaneously in just one click. i have already a code for opening the URL but just for one cell at a time only, let's take a look.

Sub license_upgrade()
    File = "http://" & ActiveCell.Offset(0, 3).Value & ":1080/" & ActiveCell.Offset(0, 8).Value & ""
   Call ShellExecute(0&, vbNullString, File, _
        vbNullString, vbNullString, vbNormalFocus)
 
End Sub

Now, all I want is that I will select a range, let's say 15 cells in a single column, then using that code, when i click the command button, those 15 cells will open a 15 urls simultaneously.

 

[Stonesteel]

 

[Stonesteel]

to make it short, i want to open all the links all at a time in just a click.



hope someone could help, i know this is just simple, i just don't get what code should i use. appreciate your help.

 

[Stonesteel]

Guys can you help me out on this one. I still cannot figure out what formula to use to make this work.