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

Question

首先，我看到在多个网站上有大量的问题都在问同样的问题，所以请耐心等待我，不幸的是，我看到的那些要么不合适，要么不起作用，我我远非专家。

为您提供完整的场景 - 我有一个 xlsheet，其中包含大量我供职的公司产品的唯一标识符列表。我必须（目前）手动从 sheet 复制到 google 以查看其在结果中的位置。

获得一个 vba 代码，当我运行它（热键）时，它会自动获取单元格内容并将其发送到 google 搜索中，这样我有效地将我的 3 次点击和 ctrlV 减少为一个热键。

Answer 1

代码如下：

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)部分，您真正要搜索的内容。

Answer 2

如果您只想一次打开一个 Google 搜索页面，则不需要 VBA。

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

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

并根据需要填写。

这将在 B 列中放置一个可点击的 link，对应于 A 列中的搜索词组。

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

vba code to search google using cell content as search criteria

excel

vba

ms-office

excel-formula