XL 2013 Macro qui lance une recherche du contenu de la cellule sur google

[Loloagogo78]

Bonjour

Pourriez m'aider à faire une macro qui lance un recherche Google sur le texte contenue dans la cellule sélectionnée ?

Merci d'avance, mon niveau macro est débutant, comme pour le VBA d'ailleurs...

 

[joss56]

Re : Macro qui lance une recherche du contenu de la cellule sur google

Bonjour,

Un petit fichier exemple (fonctionne avec Firefox)

Jocelyn

 

[joss56]

Re : Macro qui lance une recherche du contenu de la cellule sur google

Bonjour,

Un petit exemple à adapter...Fonctionne avec Firefox

Jocelyn

 

[Loloagogo78]

Re : Macro qui lance une recherche du contenu de la cellule sur google

​

Bonjour,

Un petit exemple à adapter...Fonctionne avec Firefox

Jocelyn

c'est la que ça coince : l'adaptation ;-) vu que mes compétences en macro/ VBA sont proche de 0

ce que je vois c'est que dans ta macro le texte doit être en B2, ce que je souhaite c'est que peu importe dans quelle cellule est le texte, la macro se lance sur la cellule sélectionnée
ce qui je pense reviens à demander comment on définit la cellule sélectionnée comme "mavar"

 

[Loloagogo78]

Re : Macro qui lance une recherche du contenu de la cellule sur google

sinon j'ai trouvé ceci sur le net mais je n'arrive pas non plus à la faire fonctionner ....
sub searchgoogle(texte as string)
Shell ("cmd /c start http://www.google.com/search?q=" & Replace(texte, " ", "+"))
Shell ("cmd /c exit")
end sub

 

[joss56]

Re : Macro qui lance une recherche du contenu de la cellule sur google

Dans le code tu remplaces :
mavar=range("b2")
par
mavar = ActiveCell