Besoin d'aide VBA excel

[winnie]

Bonjour,

Je dois faire de la qualification d'un fichier excel.

Je dois a partir d'un nom (cellule A1) et accessoirement une ville (cellule P1) faire une recherche sur google pour voir si une entreprise dispose d'un site web.

Pour l'instant j'utilise le code suivant

Sub moteur_firefox()
Dim mavar As String
mavar = ActiveCell.Value
Dim RetVal As Long

RetVal = Shell("C:\Program Files (x86)\Mozilla Firefox\firefox.exe " & "http://www.google.fr/search?q=" & Replace(mavar, " ", "+"))

End Sub

Donc la en fait je peux soit chercher le nom soit la ville si je me positionne dans l'une où l'autre cellule.

Ce que j'aimerais c'est que je me positionne dans la cellule nom (A1), ma recherche sur google soit la suivante :
nom (A1) + ville (P1)

Sachant que j'ai 1500 ligne à qualifier et que le nom en A1 et associé à la ville P1,

et que le nom en A50 et associé a la ville situé en P1.

Est-ce possible ?

Merci de vos réponses

 

[Pierrot93]

Re : Besoin d'aide VBA excel

Bonjour,

pas tout compris, regarde ce code si il peut t'aider... à adapter le cas échéant...

Dim mavar As String
mavar = Range("A1").Value & Range("P1").Value

bon après midi
@+

 

[winnie]

Re : Besoin d'aide VBA excel

En fait j'ai réussi à modéliser ce que je voulais c'etait çà :

mavar = ActiveCell.Value & (" ") & Range("Q" & ActiveCell.Row)

 

[winnie]

Re : Besoin d'aide VBA excel

et merci pour l'aide tout de meme