前言
提示:实习为了偷懒不要做太多机械性的事情,想了好久写了一个小插键。
一、首先分析头条链接?
示例:以帅哥我为例,大家可以注意到https://www.toutiao.com/search/?keyword=xxxx ,所以我们只要替代这个xxxx,然后再自动打开就可以不要一个一个去表里复制查看了。
二、写代码插件
1.引入库
代码如下:
Sub 竞品覆盖查询()
For Each A In Selection
Shell ("使用浏览器的存储地址\chrome.exe -url " & A.Value)
Next
End Sub
2.教大家怎么打开插键
首先需要将链接头复制还是以帅哥我为例
两列信息
合并
3.打开excel的模块
win+alt+F11
关闭它
选中要查询的链接
运行按win+alt+F8
然后就可以快速的查看了,只需要人眼去审核就好了。