Cuprins
Doriți să puteți introduce cuvântul dvs. de căutare într-o celulă și apoi să rulați o macro pentru a căuta pe Google? Aceasta returnează rezultatele într-o nouă fereastră Internet Explorer
Căutați pe Google dintr-o celulă
1. Introduceți următorul cod într-un modul
Sub LaunchSite () Dim newsite As Object Set newsite = CreateObject ("InternetExplorer.application") newsite.Visible = True newsite.Navigate _ "http://www.google.com/search?hl=ro&ie=UTF-8&q=" _ & ActiveCell.Text End Sub
2. Tastați cuvântul sau expresia de căutare într-o celulă, apăsați Enter, apoi faceți clic din nou pe celulă și rulați macro-ul!
Aflați mai multe despre accesarea Internet Explorer de la VBA.
