Excel-VBA und Google Maps

Ich entwickle eine Anwendung in Excel-VBA und ich brauche eine Möglichkeit für Google Maps zu erfassen, mein Standort automatisch (ohne dass ich meine Adresse angeben). Ist dies möglich durch Excel-VBA?

  • Können Sie versuchen, öffnen Sie Google Maps über Internet Explorer, und navigieren Sie dann die Schaltfläche mit der ID: id="widget-mylocation" (es ist das unten rechts).
InformationsquelleAutor user1863292 | 2017-01-23
  1. 1

    Hoffentlich bist du immer noch mit stackoverflow! Bei der Arbeit mit google maps fand ich eine kleine, schnelle URL-trick, den Sie verwenden können. Sie können die URL zum setup-Richtungen oder einfach automatisch Ihren Standort ermitteln.

    https://www.google.com/maps/dir/my+location/

    Dieser link wird automatisch nach dem laden, erzeugen Sie einen neuen link (google maps funktioniert, laden Sie Tonnen von Div-Blöcke, so dass jeder Abschnitt hat eine generierte URL) Ihrer Adresse.

    Wenn Sie möchten, nutzen Sie den link für Anweisungen, versuchen Sie folgenden

    https://www.google.com/maps/dir/my+location/Secondary address goes here
    InformationsquelleAutor MercPls
  2. 0

    Es ist nicht so, dass automatisch. Ich lief nur den folgenden Ausschnitt des vba-das war Teil dieser post, um einen web-browser eingebettet auf einem Arbeitsblatt und fand es etwas pingelig, aber es hat schließlich zu arbeiten (als pro in der code, den Sie benötigen 2 Platten, bevor Sie Sie ausführen & wenn es nicht funktioniert, Sie müssen löschen Sie den web-browser-Objekt und erneut ausführen). Dort sind ausführliche Beispiele zur Verfügung, wie hinzufügen von Markierungen auf Karten gezeigt, die auf diesem web-browser-Objekt (hier ein)

     Sub AddWebBroswerToWorksheet()

    Dim myWebBrowser
    Dim wb, doc, x As Long

    Sheet2.Activate

    Set myWebBrowser = Sheet1.OLEObjects.Add(ClassType:="Shell.Explorer.2", _
                       Left:=147, Top:=60.75, Width:=300, Height:=200)

    Set wb = myWebBrowser.Object
    With wb
         .Navigate "about:blank"
         .Document.Open "text/html"
         For x = 1 To 100
           .Document.write "init<br>"
         Next x
         .Document.Close
         .Document.body.Scroll = "no"
    End With

    Sheet1.Activate

    wb.Navigate "http://maps.google.com/maps?q=49.2827,-123.1207"

End Sub

    Von dort aus sollten Sie in der Lage sein, mit ihm zu interagieren via vba zu zeigen, Marker auf eine entsprechende web-site. In anderen Worten, es würde ein bisschen die Entwicklung zu bekommen, was Sie wollen.

    • Sorry, aber diese Antwort entspricht nicht meiner Frage. Ich bin bereits über die google api zum öffnen von google maps. Ich brauche nur einen Weg, um automatisch zu erfassen, meine aktuelle position in der it
    • Sie können ändern Sie einfach die url-Zeichenfolge entsprechend, zeigen Sie Ihre Breite und Länge wie pro die bearbeitet beantworten.
    • Vielen Dank für deinen Versuch, aber ich glaube, Sie verstehen nicht, mein problem genau: ich will nur eine Möglichkeit für Google Maps, um informieren Sie mich, meine position durch einfügen dieser Informationen in das Blatt der excel-Arbeitsblatt. Allerdings möchte ich es tun dies automatisch, d.h. ohne Vorherige informieren meine position
    • Zusätzlicher Hinweis: Wenn ich öffnen Sie google maps auf meinem PC den browser wird eine Markierung erscheinen automatisch in meine Lage. Es ist dieser Ort, ich will über vba-excel
    • Wenn excel erfassen können der url zurück, dann könnten Sie in der Lage zu bekommen halten, dass. Ich habe keine Ahnung, ob er es kann oder nicht kann.
    • OK. Ich denke, für jetzt ist dies nicht möglich, mit VBA eXCEL. Ich danke Ihnen sehr für Ihre Aufmerksamkeit. Starke Umarmung

    InformationsquelleAutor Amorpheuses
Schreibe einen Kommentar