Macro para buscar en Google desde Excel (Navegador Chrome)

0


 

Ver Video:


Código:


Sub BuscadorEnGoogle()

Dim chromePath As String

Dim search_string As String

Dim query As String

query = InputBox("Ingresar búsqueda", "Buscar en Google")

search_string = query

search_string = Replace(search_string, " ", "+")

chromePath = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe" 

Shell (chromePath & " -url http://google.com/search?q=" & search_string)

End Sub


Errores:

  • La ruta donde se encuentra chrome.exe puede variar dependiendo del equipo.


Tutorial:

En el siguiente link te muestro paso a paso como hacerlo. Aquí


⭐ Si te gustó este tutorial, por favor regístrate en nuestra Lista de correo y Suscríbete a mi canal de YouTube para que estés siempre enterado de lo nuevo que publicamos.

Entradas que pueden interesarte

Entradas más recientes Entradas antiguas

Sin comentarios

Etiquetas:
#aprendiendoexcel365, #josealcaldealias, #Excel, #funciones, #UDF, #Visual Basic, #VBA, #DAX, #Tips, #Basico, #Microsoft Excel, #Cursos Excel OnLine, #Aprende Excel, #Aprende Excel OnLine, #Excel 365, #Power Pivot, #Power BI, #Power Query, #Google Sheets, #Macros, #Código VBA, #Tutoriales Excel, #MTV, #Vbscript, #TypeScript, #Lenguaje M, #fórmulas, #funciones, #paso a paso, #funciones Excel, #libros, #tablas, #formatos, #hojas, #datos, #gráfico, #análisis de datos, #base de datos, #dashboards, #tablas dinámicas, #excel desde cero, #hoja de cálculo, #plantillas de Excel