记一次Excel的逆天操做（图片删除、超连接提取）

    前段时间整理数据的时候，简直不要太扎心➳♥゛，具体过程是这样滴：从网上复制下来的数据保存到excel表格里，结果发现居然连图片一块儿保存进来了，不止如此，由于须要提取超连接的URL地址，身为一个程序猿，不会一些逆天的操做，怎么行？难道要傻乎乎的去干苦力活？因此不得不研究了一番，下面是偶总结的一些经验，方便使用，节约时间，堪称居家旅行必备之首选，嘿嘿。

    （一）图片的统一删除

    当你的excel表格里存在太多的图片，而又不想一个一个去手动删除时，你须要的仅仅是动动手指头（不动脑吗？哈哈），是否是超级简单。具体操做：

    （1）打开表格（嗯 ，没打开你说个啥）

    （2）按Fn+F5或者Ctrl+F5（我的电脑不一样，按键组合可能不同，能够多尝试一下），出现下面的弹出框即表示成功：

    （3）点击定位条件，选择里面的对象，肯定，则会看到表格中的图片都被选中了：

    （4）最后固然是删除操做了，点击键盘上的Delete键，轻松搞定。

    （二）超连接URL提取

    从上面的表格中能够看到有不少超连接，咱们的目标是什么——提取URL，因此问题来了，这个要怎么快速方便的提取呢？这里要用到一个工具-宏，咱们要编写一个VBA函数，没错，若是 你的excel表格不支持，那我只能说——赶快卸掉，留它何用。具体操做：

    （1）打开表格

    （2）右击表格下方的Sheet，在弹出的选项里选择查看代码（各人操做可能不一样），以下：

    （3）选择查看代码后，会弹出VBA工程界面：

    （4）选择你的当前excel对象（若是你打开多个表格），右击选择插入-模块，并输入提取函数的代码：

    上面的GetActAddress()函数就是提取超连接的URL的具体实现，代码以下：

Function GetActAddress(HlinkCell)

Application.Volatile True
With HlinkCell.Hyperlinks(1)

   GetActAddress = IIf(.Address = "", .SubAddress, .Address)
   
   End With
   
End Function

    （5）关闭VBA工程界面，在超连接对应行的空白单元格中，输入=GetActAddress(A2)，能够看到，刚才编写的函数出如今你的表格函数选项里了，参数A2是超连接对应的单元格位置（本身数数），肯定后会获得当前超连接的URL，你只需将鼠标放置于该单元格的右下角等变成十字状，向下拖动便可，其余的超连接也会相应获取对应的URL。

    （6）你觉得这样就结束了吗？太天真了。按上述操做获得的URL是经过函数获取的，不能直接应用，不然会出现#VALUE的字样，而不是你须要的值，这时，只需选中该列-复制，粘贴到另外一空白列（注意：粘贴时选择只粘贴值），这样，就大功告成了。

    （三）去除超连接，保留文本文字

    当咱们获取了超连接的URL后，该超连接就没有利用的价值了，此时，你是否是很想将他们变成纯文字格式的？很简单。具体操做：

    （1）选中超连接或者超连接所在的列

    （2）右击选中弹出的“删除超连接“

    （3）肯定后，便可获得纯文字格式的了。

    好了，上面的一些小操做仍是很实用的，毕竟除了写代码，咱们仍是会遇到各类各样的事，都须要咱们去解决，时间就是金钱，掌握一项技能仍是很不错的。