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

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
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