Put a Microsoft Web Browser control on the sheet. Navigate to required web page using:
Code:Private Sub CommandButton1_Click() WebBrowser1.Navigate "http://www.mrexcel.com" End Sub
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "Sheet1" Then Cancel = True
End Sub