【Excel VBA】通过单元格直接搜索百度百科

最新推荐文章于 2020-12-03 14:28:11 发布

神创

最新推荐文章于 2020-12-03 14:28:11 发布

阅读量423

点赞数 1

分类专栏： VBA excel

本文链接：https://blog.csdn.net/qq_19741181/article/details/79857915

版权

excel 同时被 2 个专栏收录

31 篇文章 2 订阅

订阅专栏

VBA

26 篇文章 0 订阅

订阅专栏

Sub mySearching()
    '以选中内容为搜索关键词
    Dim mySearchEngine As String
    'mySearchEngine = "http://www.google.cn/search?hl=zh-CN&q="  'Google搜索
    'mySearchEngine = "http://www.baidu.com/s?wd="  '百度搜索
    mySearchEngine = "https://baike.baidu.com/item/"  '百度百科
    'Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE " & mySearchEngine & Selection.Text, 1
    Shell "C:\Program Files (x86)\UCBrowser\Application\UCBrowser.exe " & mySearchEngine & Selection.Text, 1
End Sub