Skip to main content

maps & more Ingenieurbüro Hartmut Wallwitz

Bei uns haben Sie immer gute Karten

Startseite
Wir über uns
Kontakt
Dienstleistungen
IT-Schulung
Tips&Tricks
Das GIS in Access
Gissers Notitzbuch
E-learning
Historische Karten
Downloads
News
Referenzen
Partner
Mitgliederanmeldung
Siteübersicht
Impressum
Adressen aus einer Access Datenbank direkt in google maps verorten
 
 
Sie haben eine Kontaktdatenbank erstellt und wollen Adressen aus Ihrem Kontaktformular direkt in google maps verorten.
 
Nichts einfacher als das.
 
1. Fügen Sie Ihrer Kontakttabelle ein Feld Kartenlink vom Typ Hyperlink hinzu
2. Übernehmen Sie dieses Feld als Steuerelement in Ihr Formular
3. Erzeugen Sie im Formular neben dem Eingabefeld des Kartenlinks eine neue    Schaltfläche
4. Dem Ereignis Klick fügen Sie folgenden VBA-code hinzu:
 
Private Sub erzeuge_google_link_Click()
' Hartmut Wallwitz
'26.02.2011
'Felder Me.adresse, Me.PLZ, Me.ort  ggf. an spezielle Voraussetzungen anpassen
Dim mein_link As String

mein_link = "http://maps.google.com/maps?f=q&source=s_q&hl=de&geocode=&q=" & Me.Adresse & "+" & Me.PLZ & "+" & Me.Ort 
Me.Kartenlink.SetFocus
Me.Kartenlink.Text = mein_link
Me.Ort.SetFocus
 
End Sub
 
Viel Erfolg!