Bonjour,

je souhaite sur base d'une table contenant des adresses afficher plusieurs adresses sur une carte (juste de la localisation , pas de calcul de distances). Du style, si ma table contient toutes les adresses des salles de sport. Je souhaite afficcher sur google maps , toutes les salles de sport de bxl (code postal 1000).
J'arrive à afficher une adresse dans google maps via le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Dim adresse As String
Dim v_http As String
adresse = Forms![F_sig_kine].Form![F_SIG_kine_S/F_ADR]![No].Value & " "
adresse = adresse & Forms![F_sig_kine].Form![F_SIG_kine_S/F_ADR]![Rue].Value & " "
adresse = adresse & Forms![F_sig_kine].Form![F_SIG_kine_S/F_ADR]![Code postal].Value & " "
adresse = adresse & Forms![F_sig_kine].Form![F_SIG_kine_S/F_ADR]![Localité].Value
 
v_http = "http://maps.google.be/maps?f=q&hl=fr&q="
v_http = v_http & adresse
 
FollowHyperlink (v_http)

merci d'avance pour votre aide,

david