Entfernung zwischen zwei PLZ mit GoogleMaps berechnen!

[chris-ka]

Hi,

es liegt vermutlich an der Funktion Webdienst, diese wurde deaktiviert!?
Es erscheint ein Hinweis soll Webdienst aktiviert werden -> aber selbst wenn man auf ja klickt muss noch manuell in den Zellen ein Doppelklick durchgeführt werden, für mich sieht das nach einem BUG aus, welches wohl einer der letzten Updates mit sich gebracht hat.
Da ist was "verschlimmbessert" worden.


Obwohl automatisch Berechnen eingeschaltet ist aktualisieren sich die Funktionen nicht.
Neu Einträge werden aber erkannt!?

Anbei so wie es im Moment bei mir ist.
https://www.youtube.com/watch?v=ywOBkEi8feI

als kurzes Video
lg
Chris

[chris-ka]

Hi,

übrigens, natürlich geht statt dem Doppelklick auch ein kopieren. (in der ersten Zelle einen Doppelklick-> dann Formel kopieren)
Nachdem ich die Mappe gespeichert hatte, wurden die KM korrekt angezeigt und die Hinweismeldung ist nicht mehr erschienen.

gruß
Chris

[Excellaie]

Hallo!

Passt das so?

Gruß
Wilfried

Hallo Wilfried,

danke für die super Liste, aber besteht die Möglichkeit, dass man noch Zwischenziele hinzufügt, die dann ebenfalls autoimatisch berechnet werden ( KM - Entfernung ) ?

Danke
Tom

[Rabe]

Hallo,

hier geht es weiter, damit die Übersichtlichkeit bestehen bleibt:
http://www.clever-excel-forum.de/thread-...l#pid46808

[hannes999]

Hallo Alexandra,

ich habe vor über 2 Jahren mal was zusammengestellt, siehe Anhang. Du kannst hier oben 2 Ausgangspunkte eintragen und darunter in der Tabelle verschiedene Ziele.

Hallo schauan,

von Deiner Tabelle bin ich begeistert.
Wie kann ich mir aber die Maps anzeigen lassen.
Habe leider keine Idee.
Vielleicht kannst Du mir helfen.

MFG
hannes999

[thunderstrik]

Hallo zusammen,

ich war auch auf der Suche nach dieser Funktion und bin u.a. auf diesen Thread gestoßen.

Ich habe Wilfrieds Beispieldatei mal etwas bereinigt und umgebaut.
Vielleicht hilft dieses Beispiel auch anderen Leuten weiter.


Gruß Carsten

Vielen Dank! Gibt es für Excel 2010 mittlerweile eine Version, die es ermöglicht mehrere Adressen direkt hinein zukopieren, also so eine impletierte Schleife. Aktuell müsste ich bei jeder reinkopierten Zeile auf F2 und Enter.

[schauan]

Hallo Alexandra,

ich hab das selber noch nicht in Excel gemacht. Google mal nach Excel PowerView Karte.

Hallo thunderstrick,

wäre gut, wenn Du einen Link zum Beitrag postest und nicht nur das Zitat. Der Thread ist ja schon recht lang und da fällt es schwer, den richtigen Beitrag nebst zugehöriger Datei zu finden.

[thunderstrik]

Hallo thunderstrick,

wäre gut, wenn Du einen Link zum Beitrag postest und nicht nur das Zitat. Der Thread ist ja schon recht lang und da fällt es schwer, den richtigen Beitrag nebst zugehöriger Datei zu finden.

Jo sorry, hier der Link: http://www.clever-excel-forum.de/thread-...l#pid22057 ...

[schauan]

Hallo thunderstrik,

Wenn Du im Makro Worksheet_Cahnge diese Zeilen

Code:

   Dim GMaps As clsGMaps
   Set GMaps = New clsGMaps
   If MapCells(GMaps, Target) Then GMaps.GetGoogleMaps

so ersetzt

Code:

   Dim GMaps As clsGMaps, zellen As Range
   For Each zellen In Target
     Set GMaps = New clsGMaps
     If MapCells(GMaps, zellen) Then GMaps.GetGoogleMaps
   Next

sollte es gehen.

[thunderstrik]

Hallo thunderstrik,

Wenn Du im Makro Worksheet_Cahnge diese Zeilen

Code:

   Dim GMaps As clsGMaps
   Set GMaps = New clsGMaps
   If MapCells(GMaps, Target) Then GMaps.GetGoogleMaps

so ersetzt

Code:

   Dim GMaps As clsGMaps, zellen As Range
   For Each zellen In Target
     Set GMaps = New clsGMaps
     If MapCells(GMaps, zellen) Then GMaps.GetGoogleMaps
   Next

sollte es gehen.

Super geil! Vielen, vielen Dank!

Jetzt hab ich nur noch ein kleines Problem, in kann z.B. in den Zellen der Spalte B nicht auf andere Zellen verweisen, sondern der Text muss direkt hinein kopiert werden.