Option Explicit
Private Sub Command56_Click()
Dim strUrl As String
strUrl = Me.Value_Source
strUrl = Replace(strUrl, "#", "")
Application.FollowHyperlink strUrl
End Sub
This code has finally got it opening in chrome, if I set my default browser to Firefox will it automatically open in Firefox