Recherche Google dans TextBox d'un Userform

Résolu
Le_Maniouk Messages postés 317 Date d'inscription   Statut Membre Dernière intervention   -  
Le_Maniouk Messages postés 317 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je cherche à effectuer une recherche Google grace à ma textbox de mon userform.

C'est à dire que si je tape à l'intérieur "Comment ça marche" que la page google s'ouvre avec les résultats de ma recherche.

Et si la recherche peu se faire dans mon navigateur par défaut, alors là ça serait TOP ! Oui car on va être plusieurs à utliser Excel mais on utilise pas tous le même navigateur ^^

Sinon j'utilise XL2016. Merci d'avance xD



A voir également:

1 réponse

Réponse 1 / 1
Le_Maniouk Messages postés 317 Date d'inscription   Statut Membre Dernière intervention   158
 
Bon au final j'ai trouvé. Donc pour ce qui cherche, j'ai créé mon TextBox1 dans mon UserForm. Ensuite j'ai créé mon un bouton de commande puis j'ai collé ça :

1 - Private Sub CommandButton1_Click()
2 - Dim mavar As String
3 - mavar = TextBox1
4 - ActiveCell.Hyperlinks.Add Anchor:=Selection, Address:= _
5 - "https://www.google.fr/webhp?hl=fr&source=hp&gws_rd=ssl" & mavar & "&meta=&aq=f&oq="
6 - ActiveCell.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
End Sub

Voilà ;)

Je suis avec Excel 2016
0