Microsoft 365 Associer lien hypertexte google maps d'une cellule à une image

[raf26]

Bonjour,

J'ai besoin de votre aide pour associer un lien hypertexte m'amenant à google maps à une image présente dans mon fichier.

En H9 j'ai ma formule (qui fonctionne) qui ouvre google maps à l'adresse indiquée.

Comment associer ce lien à l'icone de google maps ?

En résumé, je voudrais cliquer sur l'icone et que cela m'ouvre google maps à l'adresse saisie.

Mon classeur ci-joint.

Merci d'avance pour votre aide

Bon week-end

 

[Hasco]

Bonjour,

Vous trouverez cette macro associée à votre logo gmap dans le classeur joint:

Sub Logo_Google_Map_Click()
    With ThisWorkbook.Sheets("Feuil1").Range("H4")
        If .Value <> "" Then
            ThisWorkbook.FollowHyperlink ("https://google.com/maps/search/?api=1&query=" & .Value)
        Else
            MsgBox "Aucun lien à suivre"
        End If
    End With
End Sub

A vous de vous assurez de la bonne rédaction de la requête

Cordialement

 

[raf26]

Bonjour Hasco

Cela fonctionne parfaitement, merci !!!!

Bon week-end