Question

首先我可以看到多个网站上有大量问题提出同样的问题，所以请耐心等待我，不幸的是我看到的那些不适合或不工作我很远来自专家。

为您提供完整的方案 - 我有一张xlsheet，其中包含大量我公司销售的公司产品的唯一标识符列表。我必须（目前）从工作表手动复制到谷歌以查看其在结果中的位置。

什么是好的是获得一个vba代码，当我运行它（热键），自动获取单元格内容并将其发送到谷歌搜索，所以我有效地减少了我的3次点击和ctrlV到一个热键。

Answer 1

如果你想要做的只是一次打开一个谷歌搜索页面，就不需要VBA。

使用A1中的搜索词组，请使用此公式，例如：

=HYPERLINK("http://www.google.com/search?q=" & A1,A1)

并根据需要填写。

这将在B列中放置一个可点击的链接，对应于A列中的搜索短语。

Answer 2

以下是代码：

Sub Google_search()

Dim IE As Object

  Set IE = CreateObject("InternetExplorer.Application")

  IE.navigate ("http://www.google.com/search?q=" & Cells(1, 1)) 'it will search for value, what is in column A1

  IE.Visible = True


End Sub

为单元格排列Cells(1, 1)部分，您真正想要搜索的内容。

使用单元格内容作为搜索条件来搜索谷歌的vba代码

2 个答案: