Macro pour calculer la distance entre deux villes via google maps

vbacrumble

XLDnaute Accro

• 21 Avril 2009

• #106

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

Bonjour


Essayes pour cette suppression de t'adjoindre les services de VBScript.

Un exemple à adapter pour VBA
Il faut trouver la variable pour Temporary Internet Files
(pour modif ligne en rouge)

'DelFiles.vbs
' Sample VBScript to delete files using FileSystemObject
' Author Guy Thomas http://computerperformance.co.uk/
' Version 2.3 - April 2007
' --------------------------------------------------------'
Option Explicit
Dim objFSO, objFiles, objShell, intCount
Dim strFile, strName, strDirectory, strEnv, strExt
Set objShell = CreateObject("Wscript.Shell")
' ---------------------------------------------------------
' Below is where you edit to delete files in %temp% folder
strEnv = "D:\temp"
' strEnv = objShell.ExpandEnvironmentStrings("%temp%")
intcount = 0

' Create the File System Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFSO = objFSO.GetFolder(strEnv)
Set objFiles = objFSO.Files
For each strFile in objFiles
On Error Resume Next
strFile.delete
intCount = intCount +1
next

set objFSO = nothing
set strFile = nothing
set objFiles = nothing
'WScript.Echo intCount & " files were deleted"
'WScript.Quit

Cliquez pour agrandir...

 

Dernière édition: 21 Avril 2009

Vote positif 0 Vote négatif

vbacrumble

XLDnaute Accro

• 21 Avril 2009

• #107

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

Re

EDITION: une version plus prudente

Code:

Sub test()
Dim objApp
Set objApp = CreateObject("WScript.Shell")
objApp.Run "cmd.exe /c " & Chr(34) & "del /S /Q %temp%" & Chr(34)
End Sub

Un script plus court
A utiliser avec prudence
Dans ce exemple le répertoire Temp est supprimé

Code:

''Set objApp = CreateObject("WScript.Shell") 
''objApp.Run "cmd.exe /c " & Chr(34) & "rmdir /S /Q %temp%" & Chr(34)

 

Dernière édition: 21 Avril 2009

Vote positif 0 Vote négatif

4

405lhelo

XLDnaute Nouveau

• 4 Mai 2009

• #108

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

Le problème est que je connais pas du tout vb script.
Apparement je suis obligé de passer par vb script. Donc si quelqu'un pouvait me guider dans la réalisation de cette macro je lui en serai trés reconnaissant. Sachant que c'est la dernière étape que j'ai a réaliser avant la fin de mon projet.
Voici l'URL de mes fichiers temporaires:
C:\Documents and Settings\charlotte\Local Settings\Temporary Internet Files\Fichiers Internet temporaires
Je vous remercie d'avance

 

Vote positif 0 Vote négatif

vbacrumble

XLDnaute Accro

• 4 Mai 2009

• #109

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

Bonjour

Erreur de manipulation.

Désolé.

PS: merci au modérateur de supprimer ce message.

 

Dernière édition: 4 Mai 2009

Vote positif 0 Vote négatif

Brigitte

XLDnaute Barbatruc

• 21 Mai 2009

• #110

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

Bonjour,

Ce post c'est pour attirer (peut être) l'attention de Catrice sur un fil où on aurait besoin de ses lumières, car le fichier ici n'est plus disponible pour aider exene.

Alors Catrice (on peut pas t'envoyer de mp) si tu veux bien et si tu lis ce fil :

https://www.excel-downloads.com/threads/vos-conseils-pour-lutilisation-dun-materiel-gps.120698/

Merci à toi d'avance.

 

Vote positif 0 Vote négatif

C

Catrice

XLDnaute Barbatruc

• 21 Mai 2009

• #111

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

Bonjour Brigitte,

J'ai posté un lien sur le Fil cité.
Merci

 

Vote positif 0 Vote négatif

Brigitte

XLDnaute Barbatruc

• 21 Mai 2009

• #112

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

Merci à toi, j'ai mis le fichier sur xld, ainsi, plus de souci.

 

Vote positif 0 Vote négatif

C

calhoa

XLDnaute Nouveau

• 15 Juin 2009

• #113

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

Bonjour,

Je suis tombée par hasard sur cette discussion et ce fichier "itiniraire" qui correspond exactement à ce que je cherchais
Cependant est-il possible de faire la même chose, mais allant chercher l'info sur Michelin plutôt que google maps?

Pour être honnête, j'ai essayé de bidouiller la macro, mais bien sûr ça ne fonctionne pas vu que je n'y connais strictement rien !!!

Merci d'avance!!

 

Vote positif 0 Vote négatif

D

dirmon

XLDnaute Junior

• 16 Juin 2009

• #114

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

Bonjour,

Petit up pour la même question que Calhoa.

J'avais d'ailleurs poster cette question pour adapter des temps d'itinéraire fait en camion au lieu d'une voiture.
Malgré mais plusieurs essais je ne suis toujours pas arrivé à adapter la macro

Merci pour votre aide

 

Vote positif 0 Vote négatif

X

xelacin

XLDnaute Nouveau

• 21 Juin 2009

• #115

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

Salut à tous et franchement merci pour ce génial petit outil.
Est-il possible de mettre une cerise sur ce gâteau en insérant une possibilité de calcul automatique d'indeminités kilométriques d'après le total trouvé ?

D'avance merci.

 

Vote positif 0 Vote négatif

C

Catrice

XLDnaute Barbatruc

• 21 Juin 2009

• #116

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

Bonjour,

Pour répondre aux 3 derniers Post ...
Non, ce n'est pas adaptable à Via Michelin. Leur type de requete Internet ne permet pas de le faire.
Pour les camions, j'avais trouvé un autre site plus approprié mais pas retrouvé depuis

Pour les indémnités, il suffit de multiplier les km par le taux de remboursement en vigueur.
En mettant une formule qui sebase sur la derniere cellule de la colonne en haut du tableau ça devrait fonctionner.
Voir le Post #80

 

Dernière édition: 23 Juin 2009

Vote positif 0 Vote négatif

Y

yves77

XLDnaute Nouveau

• 22 Juin 2009

• #117

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

Bonjour a tous

Nouveau sur xld, je suis impressionné par ce travail, je ne pensait pas que Excel permettait cela

vraiment c'est incroyable, félicitation ! grand bravo a tous Gruick – Catrice –Ledzepfred et platina pour son post tous ceux et celle qui se ont apporté leur pierre a l'édifice, voici un lien qui permet de calcul un itinéraire pour poids lourd avec une optimisation temps ou distance

Bottin Carto : Cartes, Plans et Itinéraires en France et en Europe !

Catrice peut nous dire si le site peut être utilisé dans votre travail ?

Merci d'avance

 

Vote positif 0 Vote négatif

C

Catrice

XLDnaute Barbatruc

• 22 Juin 2009

• #118

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

Bonsoir,

On doit pouvoir faire quelque chose avec ce site.
Je vais regarder asap.

 

Vote positif 0 Vote négatif

I

idiomea

XLDnaute Junior

• 23 Juin 2009

• #119

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

Merci Catrice, cette macro est géniale !!

Cordialement Guillaume

 

Vote positif 0 Vote négatif

exene

XLDnaute Accro

• 23 Juin 2009

• #120

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

Bonsoir,

Une autre approche par myDearFriend (vraiment impressionnante) que je voudrais remercier ainsi que catrice.

Articles : myDearFriend! Excel Pages

 

Dernière édition: 23 Juin 2009

Vote positif 0 Vote négatif