Rapport de message :*
 

Re: Activer la vue aérienne sur Virtual Earth

Titre du sujet : Re: Activer la vue aérienne sur Virtual Earth
par Jacky le 03/08/2012 21:00:42

Bonsoir Didier, Le Forum.

Tout d'abord, toutes mes excuses pour les précendents messages. Je ne sais pas pourquoi j'ai écrit Michel et je ne t'ais pas remercié pour l'excellent tuto que tu as fais sur Virtual Earth.

Voici une adaptation sur une feuille Excel pour les Versions 2007 et 2010.

Mode d'emploi:

Ne pas modifier les boutons d'options, laissez-les tel-quels.

Faites la recherche, ensuite vous pouvez cliquez sur le bouton Page d'impression, pour pouvoir imprimer l'itinéraire. Pour revenir sur la page par défaut de Virtual Earth, cliquez sur  le bouton << Page.

Petit incovénient: il se peut que, suivant les résolutions d'écran, les lignes soient décalées. Il faudra alors modifier dans le Module Md_GH, celles-ci en gras:

If cel = "" Then cel.Delete
 End If
 Feuil2.[A51:A60].Copy Feuil1.[F8]
 Feuil1.optKms = True
 Feuil1.chkNav = True
 Next cel

lien: ICI

A bientôt.