Bonjour à tous,
Pour ce type de besoin, le VBA est inutile, on peut passer par les API de google.
Avec une première formule du type :
=SERVICEWEB("https://maps.googleapis.com/maps/api/distancematrix/xml?origins="&C$3&"&destinations="&$A5&"&mode=driving")
et une deuxième :
=ARRONDI(FILTRE.XML(B5;"/DistanceMatrixResponse/row/element/distance/value")/1000;1)
A noter : curieusement l'API de google de reconnait pas Bayonne mais BayonneS
Cette méthode fonctionne avec Office 2016, et je sais qu'avec 2007 ce n'est pas fonctionnel. Avec 2010, jamais testé
Pierre