How do I open URL in Chrome on a Mac?

How can I do this on a MAC?

Function SendURLToChromex()
    Dim chromePath As String
    Dim MyURL As String
    MyURL = "www.yahoo.com"
    chromePath = """C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"""
    Shell (chromePath & " -url " & MyURL & " ")
End Function