Open Website With Mozilla FireFox

I have been using some code which will open a blank email from a textbox with the appropriate email address in it with a single mouse click. Now I am trying to open a website in the same manner. See code the textbox code below:

Private Sub txtWeb_Enter()
Dim wLink As String
wLink = txtWeb.Value
On Error Goto err_Handler
ActiveWorkbook.FollowHyperlink Address:=wLink, NewWindow:=True
Unload Me
Exit Sub
err_Handler:
MsgBox "Cannot connect to " & wLink
End Sub

This code successfully opens Internet explorer, and opens the appropriate url.
But I want Mozilla to be the web browser.