creer un lien d'après deux colonnes... en sortir des données.

[eymeric]

Bonjour,

Alors là j'ai du pain sur la planche et je serais super content que vous puissiez m'aider....

J'ai toute un liste d'adresse dont je doit tirer les coordonnées gps. Pour ce faire, il existe un site qui, d'après l'adresse, fournit les coordonnées.
Comme vous le voyez dans mon fichier exemple, dans un premier temps je pensais creer une colonne de liens correspondant respectivement aux colonnes b et d. J'avais eu l'astuce pour faire une macro de ce type mais pour une variable, là, il y en a deux !
Une fois ces liens .... le site de "map" propose un lien qui contient les fameuses coordonnées ! Est-il possible, d'après vous de sortir automatiquement les coordonnées ? Sinon, faut que je le fasse manuellement (


Merci d'avance pour vos brillantes lumières ;

 

[lea]

Bonjour,

Si j'ai bien compris tu veux extraire les valeurs de GridE et de GridN données par le lien suivant

http://www.multimap.com/map/browse.cgi?GridE=2.71967&GridN=48.92591&client=public&lon=2.71967&lat=48.92591&place=RUE+PAUL+VALENTIN,+77410,+ANNET+SUR+MARNE&db=FR&local=&type=&start=&limit=&overviewmap=&scale=5000&lang=&db=FR

Question : est ce que les liens que tu récupèreras commenceront toujours de la même façon, c'est à dire :

http://www.multimap.com/map/browse.cgi?GridE=2.71967&GridN=48.92591&

Si c'est le cas une routine en VBA te permettra d'extraire ces valeurs
Léa

 

[eymeric]

Oui, tu as tout à fait compris et les coordonnées, d'après les différents esssais que j'ai fais, sont toujours placées au même endroit.
Tu penses qu'il est possible de tirer ces coordonnées depuis les colonnes excel de mon exemple !?? Alors là, je serais épaté ! Tu pouurrais me faire un exemple sur mon fichier stp ?
Par contre.....j'y connais rien en VBA (



Merci d'avance pour ton aide !

 

[eymeric]

Voici un exemple de macro que l'on ma fourni pour créer des liens colonne b à partir de la colonne a (0,-1)
Mais ne parviens pas à la changer pour obtenir, dans un premier tps un lien à partir d'une colonne b et d ! exemple dans le premier topic.
merci


RP11-529E4 Liens
RP11-314L21 Liens

Sub liens_clones()


Dim Valeur, Prefixe, Suffixe, Lien As String
Dim Boucle As Integer

Prefixe = "http://www.ncbi.nih.gov/mapview/map_search.cgi?taxid=9606&query="
Suffixe = "&qchr=&strain=All&advsrch=off&neighb=off"

Range("b3").Select
For Boucle = 161 To 176
Range("b" & Boucle).Select
Valeur = ActiveCell.Offset(0, -1).Value
Lien = Prefixe & Valeur & Suffixe
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Lien, TextToDisplay:="Liens"
Next Boucle

End Sub

 

[eymeric]

personne ne peut m'aider ?