EXCEL macro : open website

Insert this code into module. You can try running it using F8 button.

=====================================================

 Sub internet()  
 Dim Websitename As String  
 Websitename = "http://scriptaku.blogspot.com/" 'Change the link name here  
 ActiveWorkbook.FollowHyperlink Address:=Websitename, NewWindow:=True  
 End Sub  

=====================================================

download example