Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 08:01:34
Textbox Inhalt prüfen und Code abbrechen
24.04.2024 06:38:45
Kumulierte Daten für Intervalllaufeinheiten
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1160to1164
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1160to1164
1160to1164
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Google Maps: Informationen auslesen

Google Maps: Informationen auslesen
Thomas
Hallo,
in google maps gibt es die Funktion "In der Nähe suchen". Gibt man z.B. das Stichwort "Arzt" ein, werden in dem gesuchten Ort alle Ärzte mit Adresse und Telefonnummer neben der Karte aufgelistet. Gibt es eine Möglichkeit, aus Excel heraus die Suche in google maps zu starten und das Ergebnis (Adresse und Telefonnummer) in eine Exceltabelle zu schreiben?
Gruß Thomas

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Google Maps: Informationen auslesen
16.06.2010 23:59:16
{Boris}
Hi Thomas,
ich kenne jemanden, der Strecken (Entfernenungen) in Excel mit Hilfe von Google.Maps programmiert / berechnet hat. Dabei werden die beiden Orte aus Excel heraus in Google.Maps eingelesen und das Ergebnis - die Entfernung - in Excel zurückgeschrieben. Natürlich alles automatisch - und natürlich nicht umsonst. Wenn Du Interesse hast, dann werde ich ihn über diesen Thread informieren.
Grüße Boris
AW: Google Maps: Informationen auslesen
17.06.2010 15:37:02
Thomas
Hallo Boris,
danke für Dein Angebot. Kosten soll die Lösung natürlich fast nichts. Ich habe beim Suchen auf www.herber.de folgenden Ansatz gefunden:
Sub HTMLAuslesen()
Dim wks As Worksheet
Dim lRow As Integer, iRow As Integer, iRowT As Integer
Dim sSearch As String
sSearch = "https://www.google.de/search?"
sSearch = sSearch & "q=excel&hl=de&btnG=Google-Suche"
sSearch = sSearch & "&meta=lr%3Dlang_de"
Application.ScreenUpdating = False
Workbooks.Open sSearch
Set wks = ActiveSheet
lRow = wks.Cells(Rows.Count, 1).End(xlUp).Row
Workbooks.Add
For iRow = 1 To lRow
If wks.Cells(iRow, 1).Hyperlinks.Count = 1 Then
iRowT = iRowT + 1
Cells(iRowT, 1) = wks.Cells(iRow, 1).Hyperlinks(1).Address
End If
Next iRow
wks.Parent.Close savechanges:=False
Application.ScreenUpdating = True
End Sub
Vielleicht hat ja jemand eine Idee, wie man den Code für mein Problem anpassen kann.
Gruß Thomas
Anzeige

24 Forumthreads zu ähnlichen Themen

VBA - Strecken aus Google Maps auslesen?
Axel

Hallo,
ich habe folgende Aufgabenstellung:
Ich habe eine Liste mit 200 Start- und Zielorten, für diese Strecken muss ich die Länge herausfinden.
Da ich keine Lust habe das alles händisch zu tun, hatte ich die Hoffnung dies über VBA zu realisieren.
Beispiel:
Start/Ziel/Streck...
17.02.2009 08:37:00
Thread-ID: 1051364
7 Beiträge
Anzeige
Distance mit Google Maps
Carsten

Hallo zusammen,
ich habe heute diesen Beitrag bei euch gesehen. https://www.herber.de/forum/archiv/1104to1108/t1107222.htm
Eine echt gute Lösung.
Jedoch suche ich das ganze International. Z.b.
Abgangsort - Land- Plz
Endort - Land - PLZ
In der Praxis könnte es so sein
22.07.2010 16:22:55
Thread-ID: 1168322
4 Beiträge
Entfernung mit Google Maps berechnen
Doliwa

Hi zusammen,
ich kämpfe schon seit einer Woche an einer Aufgabe.
Startadresse: B1
Zieladresse: B2
Distanz soll in Zelle B3 eingegeben werden.
Wie muß das VBA-Programm aussehen, damit die Zellenwerte in Maps übertragen werden, ich dann in Maps die Route sehen kann und die Kil...
17.03.2015 16:38:05
Thread-ID: 1415530
2 Beiträge
Anzeige
GoogleMaps Hyperlink aus Schaltbox
Bulls

Hallo Zusammen,
ich hoffe mir kann Jemand helfen, ich möchte in einer Schaltbox einen Hyperlink zu Googlemaps haben.
Mein Hyperlink zieht sich die Daten aus 3 Zellen, Strasse, Plz und Ort, der Abfahrort ist ebenfalls fest definiert. Folgen Code habe ich, bekomme es aber nicht zum Laufen...
11.07.2017 00:59:53
Thread-ID: 1568384
5 Beiträge
Dynamischer Link nach Google Maps
Erwin

Guten Morgen,
in mehreren Zellen habe ich PLZ und Ort gespeichert.
Mit folgenden einfachen links kann ich zu Google maps springen, das klappt:
=HYPERLINK("http://maps.google.de/maps?f=q&source=s_q&hl=de&geocode=&q="&A1;"GoogleLink")
=HYPERLINK("https://www.go...
20.10.2017 08:49:48
Thread-ID: 1586917
7 Beiträge
VBA Entfernung Googlemaps
Herbert

Hallo Excel-gemeinde, ich benutze zur Bestimmung einer Wegstrecke von A nach B seit ca. zwei Jahren ein Excel VBA siehe Anhang "https://www.herber.de/bbs/user/124264.xlsm. Bisher funktionierte diese tadellos. Seit ca. einer Woche aber bekomme ich fast nur noch die Meldung "Es kann keine Route e...
27.09.2018 13:54:41
Thread-ID: 1648128
3 Beiträge
adressen in google maps suchen
rene

hi liebe forummitglieder,
das ist so mein erster forum beitrag meines lebens hehe. ich hoffe ich bin hier richtig und ihr könnt mir weiterhelfen.
ich habe eine liste von adressen von instituten in spalte A
in Spalte B möchte ich den google maps link dieser institute haben.
ich...
05.04.2019 22:28:22
Thread-ID: 1685575
3 Beiträge
Daten auf einer Landkarte darstellen
Özcan

Hallo,
ich würde gerne Daten nach Postleitzahlen geordnet auf einer Deutschlandkarte darstellen. Ich weiß, leider nicht, wie man das machen kann. Soweit ich weiß, gab es in Excel 97 eine solche Funktion, jetzt aber nicht mehr?!
Kann mir vielleicht jemand da weiterhelfen und mir mit einem...
04.11.2004 14:43:04
Thread-ID: 512020
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
4
3
1
1
4
6
2
2
2
4
4
7
6
3
1
1
4
6
2
2
4
4
7