Macro pour calculer la distance entre deux villes via google maps

[platina]

Bonjour !

Je souhaite créer une macro utilisant google maps pour calculer la distance (via la route, et non à vol d'oiseau) entre deux villes ;
Disons que j'ai le nom ou code postal (ce qui rend la chose la plus simple!) de la première ville en A1 et le nom ou code postal de la seconde ville en A2.
Comment faire pour afficher la distance entre les deux en A3 ?

Merci beaucoup !!

 

[Neileru4]

Pour transformer une donnée heure type 1:20 exclusivement en minutes, il suffit d'utiliser la formule (si l'heure est en D2, par exemple comme dans le fichier https://www.excel-downloads.com/attachments/distances_json_s%C3%A9rie-xlsm.1006977/ ) :
=(HEURE(D2)*60)+MINUTE(D2) => cellule au format standard

Je n'ai pas acces au lien pour l'exemple et je ne comprends pas l'exemple de l'heure

 

[MAROUSAM]

Le fichier c'est simplement celui donné plus haut au #602 => Distances_Json_série.xlsm

Bonjour tatiak,
j'essaye avec les deux codes suivants mais ça ne marche pas pour moi, pouvez vous m'aider svp
=SERVICEWEB("https://maps.googleapis.com/maps/api/distancematrix/xml?origins="&$A$2&"&destinations="&B2&"&mode=driving")
=ARRONDI(FILTRE.XML(C2;"/DistanceMatrixResponse/row/element/distance/value")/1000;1)

 

[Syrcrim]

Il est possible d'avoir un clé API gratuitement, comme expliqué ici même : https://www.e-monsite.com/pages/tut...-du-site/obtenir-une-cle-google-maps-api.html
A partir de là, quelqu'un sait-il comment faire pour le calcul de distance entre deux villes en saisissant la ville de départ et celle d'arrivée ?
Merci d'avance !

 

[Compte Supprimé 979]

Syrcrim... Quand on est poli, on commence par dire BONJOUR

 

[Syrcrim]

Syrcrim... Quand on est poli, on commence par dire BONJOUR

Tu as raison, où sont mes manières !
Bonjour à vous qui lirez mon message et sachez que je vous en serai reconnaissant si vous aviez la possibilité de m'aider !
Merci d'avance et bonne soirée !

 

[yoyovento]

Bonjour à tous et toutes,

Sauriez vous comment utiliser cette clef ?

Ou alors il faudrait utiliser autre chose que maps.googleapis.com ? Viamichelin ?

 

[chris]

Bonjour

Ci-joint un exemple que j'avais fait avec PowerQuery (en addon sur 2010 et 2013, intégré à partir de 2016) pour une question ici ou sur un autre forum

Il faut rentrer la clé dans la case prévue avant d'actualiser

 

[yoyovento]

ho super Chris !! merci, je fais cette clef maintenant

 

[yoyovento]

heu... question bête, j'ai mis la clef mais comment lancer le calcul ?

 

[chris]

RE

Si tu as 2016 ou plus Données, Actualiser Tout

Sinon il faut télécharger et installer l'add on PowerQuery avant de pouvoir utiliser la même commande

 

[yoyovento]

damned c'est la 2013 !
ok je reviens plus tard alors

 

[Lazarock]

Bonjour !

Lorsque je lance l'actualisation, j'ai le message suivant :
"[Expression.Error] Il n'y avait pas assez d'éléments dans l'énumération pour terminer l'opération."

J'ai bien renseigné une clé API, je n'ai pas changé les données, histoire de tester, et ça ne change rien...
La clé API a été faite sans restriction, bien placée dans la zone demandée, et je suis sur Excel 2016

Alors je suis peut être un peu limité, je ne l'exclue pas, mais je ne comprends pas le problème.

 

[chris]

Bonjour

Marche chez moi sur 2010 et 365.

Soit mauvaise clé (il y a des clés selon les API à utiliser) soit problème de sécurité

J'ai suivi la video pour prendre la clé si je me souviens bien https://www.excel-downloads.com/media/powerquery-comment-utiliser-les-services-web-dans-excel.12/

Nécessite un CB sinon ne marche pas

 

[Lazarock]

Bonjour

Marche chez moi sur 2010 et 365.

Soit mauvaise clé (il y a des clés selon les API à utiliser) soit problème de sécurité

J'ai suivi la video pour prendre la clé si je me souviens bien https://www.excel-downloads.com/media/powerquery-comment-utiliser-les-services-web-dans-excel.12/

Nécessite un CB sinon ne marche pas

Merci !
En fait j'avais bien un API mais je ne lui avais pas donné les bons droits...

ça semble marcher maintenant, mais j'avais une question : combien de fois la requête est-elle lancée quand on actualise tout ?

 

[chris]

Bonjour

Tu parles de la requête vers l'API j'imagine.

Pour être honnête, je ne sais pas.
Mais a priori autant de fois qu'elle est invoquée donc ici 2 fois par trajet.
On pourrait découper le requête PowerQuery et modifier les fonctions pour exploiter la même requête API pour en récupérer les 2 infos ou plus.

Ma solution répondait à la question du forum qui s'est élargie au fil des posts et j'ai plus cherché à vérifier et montrer la faisabilité qu'à optimiser d'autant que je découvrais cette API que je n'utilise pas moi-même.