VBA - recherche automatique sur moteur de recherche pb doublon

Bonjour à tous,

Je souhaite mettre en place une recherche automatique sur plusieurs moteurs de recherche à partir d'une cellule excel.

J'ai réussi à modéliser cela à moitié ce qui me donne ceci :
ca va peut-être paraitre un peu barbare mais étant débutant je n'ai pas réussi à faire mieux :

Code :

Sub moteur_recherche()
Dim mavar As String
mavar = [A7]

Shell ("cmd /c start http://www.google.com/search?q=" & Replace(mavar, " ", "+"))

Shell ("cmd /c start http://www.bing.com/search?q=" & Replace(mavar, " ", "+"))

Shell ("cmd /c start http://fr.search.yahoo.com/search;_ylt=A03uv8eHDGlMWwQB1AJjAQx.?p=" & Replace(mavar, " ", "+"))

Shell ("cmd /c exit")


End Sub

Voila ce que ça donne. Le résultat correspond à ce que j'attends le problème étant que je n'ai pas 3 fenêtres de mon navigateur qui s'ouvre mais 5.

J'aurais donc aimé savoir si qqn pouvais m'aider à résoudre ce problème. C'est à dire ne plus avoir 2 pages google, 2 pages bing et 1 page yahoo mais juste une page par moteur de recherche.

Merci par avance