here's one !
VB Code:
  1. Dim lngReturn As Long
  2. lngReturn = Shell("start [url]http://www.microsoft.com[/url]", vbNormalFocus)