Macro pour calculer la distance entre deux villes via google maps

platina · 4 Novembre 2008

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 !!

Mzubka · 16 Février 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Bonjour,

Tout d'abord, bravo pour cette macro! Elle correspond tout à fait à mon problème mais j'ai quelques soucis.

Ya t il des contraintes particulieres qui empechent le calcul de litinéraire ? J'ai eu plusieurs fois une erreur de Type 5.

Je ne peux malheuresement vous la décrire puisque Google m'a bloqué les requetes, je voulais donc également savoir à combien de requetes sommes nous limité ? Et combien de temps google bloque la connexion?

Merci d'avance

pascal21 · 16 Février 2012

Re : Macro pour calculer la distance entre deux villes via google maps

bonjour et bienvenue
remonte le fil, tu y trouveras certainement la réponse dans les premières pages (sur 25 tout de même)car le problème avait été découvert très rapidement
mais pensais même que le problème était résolu
chez en tout cas pas de problème rencontré

Mzubka · 16 Février 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Rebonjour,

Alors je n'ai pas trouvé réponse a mon problème
Lorsque j'exécute la macro de Bruno45, je finis par tomber par une erreur:

Erreur d'exécution de type 9
L'indice n'appartient pas à la selection.

En selectionnant "Debogage", il me souligne la ligne suivante :
.Range("TotalKm").Value = Distance(0)

dans la fonction InfoGlobal()

Ensuite il est alors impossible de relancer une requete snas obtenir la même erreur.

Quelqu'un aurait une idée de réponse ?

Merci d'avance

Compte Supprimé 979 · 17 Février 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Bonjour Mzubka,

Il faudrait arriver à définir à quel moment cela ce produit ?
Peux-tu nous joindre ton fichier ?

A+

Compte Supprimé 979 · 18 Février 2012

Re : Macro pour calculer la distance entre deux villes via google maps ... V2.00

Bonjour à tous

Une nouvelle version est arrivée, la V2.00 ... oui carrément

c'est ici : https://www.excel-downloads.com/thr...nce-entre-deux-villes-via-google-maps.106712/

- Possibilité de calculer ses itinéraires de 2 facons différentes : par API ou QUERY Google
(Query fonctionne souvent mieux, mais est plus limitée en nombre de requêtes)

- Possibilité de calculer ses itinéraires pour de multi-départs et multi-destinations
(pour les besoins de Mzubka et peut-être d'autres ...

- Correction de petis bugs, mais il en reste certainement d'autres (nouvelle version oblige )

Au plaisir

JCGL · 18 Février 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Bonjour à tous,
Salut Bruno,

Je ne trouve pas ta V2 avec ton lien....

Il reste de la place sur le serveur... Dépose mon ami...

Bises chez toi
A + à tous

Compte Supprimé 979 · 18 Février 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Salut JC

Je ne comprends pas, de mon côté en cliquant cela m'emmène bien sur la discussion #346
Et le fichier y est ... !?

Bises en retour
nos amitiés

piga25 · 18 Février 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Bonjour

Salut Bruno et JC
Félicitation Bruno pour ce fichier, très bien :

jp14 · 5 Mars 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Bonjour a tous.

J'ai une erreur d'éxécution n°5.

Circonstances de la situation

Version V1.4 (.Xls)

Ville de départ PARIS
Ville d'arrivée Venezia, Italia

L'erreur se trouve dans la fonction : "Function ConvInst(Txt As String) As String"
Ligne
"VTmp = Mid(TxtTmp, 1, FinInst)"

TxtTmp = "Continue straight"
FinInst = -1

Origine du -1
FinInst = InStr(1, TxtTmp, FGgle, vbTextCompare) - 1
FGgle = "\u003c"

Le blocage se fait après ligne 41
"prendre la sortie en direction de Venezia/Ravenna/Mestre Centro/Porto "

La procédure s’arrête à ce niveau dans "DataGoogle" (ligne 992)

"lng" : 12.211650
},
"html_instructions" : "Continue straight",
"polyline" : {
"points" : "aqptGcqoiAAIG}@Ck@?GWyDA[?]@YB[D[H]BSFa@"

Bonne journée

JP

Gruick · 5 Mars 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Bonjour,

Ca bogue parce qu'à Venise, il n'y a pas de route... à moins qu'une voiture en fibi (euh ! du fibi je ne sais pas où en trouver)

Gruick, juste pour déconner...

alexhim · 5 Mars 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Bonjour,

Petite question :

Comment fonctionne le multi-destinations dans le fichier ?

Je veux partir du point A et avec plusieurs destinations qui ne se suivre pas :

A à B
A à C
A à D

etc..

merci !

Compte Supprimé 979 · 6 Mars 2012

Re : Macro pour calculer la distance entre deux villes via google maps

jp14 à dit:
Bonjour a tous.
J'ai une erreur d'éxécution n°5.
Circonstances de la situation

Version V1.4 (.Xls)

Tu n'utilises pas la dernière version du fichier, bug corrigé (normalement)

Dernière version ici : https://www.excel-downloads.com/thr...nce-entre-deux-villes-via-google-maps.106712/

A+

Compte Supprimé 979 · 6 Mars 2012

Re : Macro pour calculer la distance entre deux villes via google maps

Bonjour Alexhim et bienvenue sur ce fourm

alexhim à dit:
Bonjour,
Petite question :
Comment fonctionne le multi-destinations dans le fichier ?
Je veux partir du point A et avec plusieurs destinations qui ne se suivent pas

Dans la feuille "Destinations" tu saisi toutes tes destinations les unes sous les autres

Tu cliques ensuite sur le bouton "Multi-destinations" de la feuille "Itinéraire"

Tu devrais avoir, normalement, le total Km et durée dans la feuille "Sauvegarde"

A+

alexhim · 6 Mars 2012

Re : Macro pour calculer la distance entre deux villes via google maps

BrunoM45 à dit:
Bonjour Alexhim et bienvenue sur ce fourm

Dans la feuille "Destinations" tu saisi toutes tes destinations les unes sous les autres

Tu cliques ensuite sur le bouton "Multi-destinations" de la feuille "Itinéraire"

Tu devrais avoir, normalement, le total Km et durée dans la feuille "Sauvegarde"

A+

Merci,

Est ce possible de choisir automatiquement la distance la plus courte ? Car google map offre souvent plusieurs possibilités, soit le meilleur parcours en temps ou en distance.

Simon86 · 18 Mars 2012

Multi Départ - Destination

Bonjour

Je ne parviens pas à utiliser correctement l'option mulit départs / destinations notamment l'utilisation de la colonne
N° Ordre.

Mon besoin est le suivant: calculer les itinéraires suivants :
A > B
C > D
E > F

Merci d'avance de votre aide !

Macro pour calculer la distance entre deux villes via google maps

platina

XLDnaute Nouveau

Mzubka

XLDnaute Nouveau

pascal21

XLDnaute Barbatruc

Mzubka

XLDnaute Nouveau

Compte Supprimé 979

Guest

Compte Supprimé 979

Guest

JCGL

XLDnaute Barbatruc

Compte Supprimé 979

Guest

piga25

XLDnaute Barbatruc

Pièces jointes

jp14

XLDnaute Barbatruc

Gruick

XLDnaute Accro

alexhim

XLDnaute Nouveau

Compte Supprimé 979

Guest

Compte Supprimé 979

Guest

alexhim

XLDnaute Nouveau

Simon86

XLDnaute Nouveau

Discussions similaires