Coller la valeur d'une cellule dans un web browser

Bonjour,

Avec l'aide de petits bouts de programme trouvés sur ce Forum, je suis arrivé à ouvrir une page Web depuis mon fichier excel.

Je cherche à coller automatiquement les coordonnées GPS se trouvant en Cellule C9 dans la page Web. (Google Maps)

Le top serait qu'en suite la validation sur la loupe se fasse automatiquement (mais c'est une autre étape)

Merci à tous ceux qui pourraient m'apporter de l'aide.

JcditJo

224gps.xlsm (26.67 Ko)

Bonjour,

Dans votre userform:

Private Sub UserForm_Initialize()
WebBrowser1.navigate "http://maps.google.fr/maps?hl=fr&q=" & [C9]
End Sub

Mais je ne comprends pas trop l'usage ici d'un userform.

Pourquoi ne pas simplement ouvrir le navigateur ??

Cdlt, Darzou

Merci de votre aide c'est exactement ce que je voulais pour mon exemple.

Pour répondre à votre interrogation, je me suis inspiré d'un bout de programme trouvé dans le forum qui utilisait une userform car je n'y connais rien en programmation VBA. Maintenant, si vous avez la solution pour ouvrir un navigateur directement avec l'adresse de google maps (du genre : http://maps.google.fr/maps?hl=fr&tab=wl&q=N47.60029%2CE1.33141) je suis preneur.

Bonjour

Avec une formule en D3

=LIEN_HYPERTEXTE("http://maps.google.fr/maps?hl=fr&q=" &C9;"ALLER")
272copie-de-gps.xlsx (18.08 Ko)

Amicalement

Nad

J'utilise ça:

Sub GoogleMap
Dim Mz
Mz = Shell("C:\Program Files (x86)\Mozilla Firefox\firefox.exe http://maps.google.fr/maps?hl=fr&q=" & [C9], 1)
End Sub

Mais il y a une autre manière de faire pour IE.

Pensez toutefois à remplacer C:\Program Files (x86)\Mozilla Firefox\firefox.exe par l'arborescence qui mène au .exe de votre navigateur.

Cdlt,

Darzou

Rechercher des sujets similaires à "coller valeur web browser"