Macro via excel pour recherche sur google Résolu/Fermé

Question

Bonjour,

J'aimerais via une macro sur excel , effectuer une recherche dans une cellule qui me permettrait d'ouvrir une page de recherche google avec le mot ou la phrase entrée dans la cellule.


Merci d'avance.

pijaku · Accepted Answer

Bonjour,
Cette procédure lance une recherche google à partir d'un mot entré en cellule A1. Tu peux l'adapter.

Sub lien()
Dim mavar As String
mavar = [A1]
ActiveCell.Hyperlinks.Add Anchor:=Selection, Address:= _
        "https://www.google.fr/webhp?hl=fr&gws_rd=ssl" & mavar & "&meta=&aq=f&oq="
ActiveCell.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
End Sub

benbeto78 · Answer

je te conseil ce site la moi j'y vais tout le temps que je veux faire un peu de vba !

https://www.developpez.net/forums/f664/logiciels/microsoft-office/excel/macros-vba-excel/

benbeto78 · Answer

c'est super pratique ça je vais le noter ! merci

zo2lapesca · Answer

Merci  à tout les deux ! Pijaku ton code marche très bien Merci :-))

garion28 · Answer

sinon ya plus simple :)

sub searchgoogle(texte as string)
Shell ("cmd /c start https://www.google.com/webhp?gws_rd=ssl" & Replace(texte, " ", "+"))
Shell ("cmd /c exit")
end sub