Πίνακας περιεχομένων
Θέλετε να μπορείτε να πληκτρολογήσετε τη λέξη αναζήτησης σε ένα κελί και, στη συνέχεια, να εκτελέσετε μια μακροεντολή για αναζήτηση στο Google; Αυτό επιστρέφει τα αποτελέσματα σε ένα νέο παράθυρο του Internet Explorer
Αναζήτηση στο Google From a Cell
1. Τοποθετήστε τον ακόλουθο κώδικα σε μια ενότητα
Sub LaunchSite () Dim newsite As Object Set newsite = CreateObject ("InternetExplorer.application") newsite.Visible = True newsite.Navigate _ "http://www.google.com/search?hl=el&ie=UTF-8&q=" _ & ActiveCell.Text End Sub
2. Πληκτρολογήστε τη λέξη ή τη φράση αναζήτησης σε ένα κελί, πατήστε enter και μετά κάντε ξανά κλικ στο κελί και εκτελέστε τη μακροεντολή!
Μάθετε περισσότερα σχετικά με την πρόσβαση στον Internet Explorer από το VBA.
