Macro via excel pour recherche sur google

Résolu
zo2lapesca Messages postés 36 Statut Membre -  
garion28 Messages postés 1545 Date d'inscription   Statut Membre Dernière intervention   -
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.
Configuration: Windows XP / Internet Explorer 6.0

5 réponses

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    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
    
    2
  2. benbeto78 Messages postés 342 Date d'inscription   Statut Membre Dernière intervention   14
     
    c'est super pratique ça je vais le noter ! merci
    0
  3. garion28 Messages postés 1545 Date d'inscription   Statut Membre Dernière intervention   408
     
    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
    0
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. zo2lapesca Messages postés 36 Statut Membre
     
    Merci à tout les deux ! Pijaku ton code marche très bien Merci :-))
    -1