Application.FollowHyperlink MyHyperlink

[ΚΩΣΤΑΣ2]

Γεια στο καλύτερο Forum
έχω ένα κουμπί σε μια forma που κάνει αναζήτηση στη GOOGLE MAP
2 χρονια δούλευε καλά με τους νέους χάρτες google δεν μου δουλεύει
η εντολή είναι
Private Sub ΧΑΡΤΕΣ_Click()
Dim MyHyperlink Ας String
Dim strGoogleLoaction Ας String
strGoogleLoaction = Replace([ΟΔΟΣ] & " " & [ΚΩΔ_ΠΕΡ] & " " & [ΤΑΧ_ΚΩΔΙΚΟΣ], " ", "+")
MyHyperlink = "https://maps.google.gr/maps?hl=el&geocode=&time=&date=&ttype=&q=" & strGoogleLoaction & "&ie=UTF8&σρι=0.067101,0.165138"
Application.FollowHyperlink MyHyperlink
End Sub

στη αναζήτηση της google είναι ???????? 16 ??????? 14562