Launching a website from Excel

  • Thread starter Thread starter Chris Gorham
  • Start date Start date
C

Chris Gorham

Hi,

At the end of every month I've written code that will
remind the user to update his version of my add-in from my
website www.mastertool.co.uk

It would also be nice to give the option of pressing a
button and launching internet explorer and the website...

I can do this by creating a hyperlink and simply recording
the action of selecting it...but there has to be a better
way.

Thks as always, I couldn't have created the add-in without
help from people on this site

Chris
 
Yes you can use the shell API

Private Declare Function ShellExecute _
Lib "shell32.dll" _
Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) _
As Long
Sub OpenWebSite()
Dim r As Long
r = ShellExecute(0, "open", "http://www.kjtfs.com", 0, 0, 1)
End Sub



Keith
www.kjtfs.co
 
Back
Top