大家好，我们都知道一个Excel工作簿，可能存在非常多的工作表（worksheets集合），有时候多达几百个。当这个时候，我们查找相关数据非常的困难，效率低下。其实我们有办法可以改善这种情况。我们应该都知道Excel有一个工具可以达到这种效果，你也许已经猜到了。他就是超链接，可以通过超链接快速查看相关工作表的内容，也就是我们本文重点介绍的主人公。

那么说起制作工作表目录和超链接，您首先想到的是什么？我们使用什么方法来实现我们的功能呢？其实方法有很多，函数法，VBA法.在正常的情况下，我们可以使用Excel自带的工作表目录功能去实现这个功能或者需求。 但有在某些情况的时候，Excel自带的功能，去实现工作表目录功能就显得有些局限性了，并不是很人性化。

PS：我们看看Excel自带的工作表目录功能去实现这个功能，是不是感觉不是很友好？

比如我们的工作表多达几百个时，一页显示不完全，对于我们查看数据明显就很不方便，很不人性化；哈哈，在我们追求美观的人来说，这个界面其实不是很友好！使用的时不够高大上!所以我们今天和大家分享的是使用Excel VBA自动建立超链接的代码，和大家一起学习！

今天的代码主要涉及2个知识点：

1、For each--Next

利用For each next循环，在我们当前的工作薄的所有的工作表之间进行循环，提取工作表的名字。

2、ActiveSheet.Hyperlinks.Add anchor:=Cells(i, 1), Address:="", SubAddress:="'" & strShtName & "'!a1", TextToDisplay:=strShtName

代码里用到了Hyperlinks.Add语句，这个语句主要是添加超链接，也是本程序的核心代码。大家有时间可以试试录制宏的功能，即可得出此代码。

还是给大家看一下源数据：

原数据中存在10个工作表，我们现在要求在Total工作表中实现一个目录带超链接的功能。

我们看看执行的效果：

看了上面的动画，是不是感觉非常适合批量建立大量的目录带超链接。其实上述的代码也是非常简单.

我们只需要将以下的代码复制到Excel的VBE窗口的模组中即可，然后设置宏代码运行的按键，点击执行，就可看到结果。

附上Excel VBA代码如下：

Sub Hyperlinkadd()

Dim sht As Worksheet, i&, strShtName$

Application.DisplayAlerts = False

Columns(1).ClearContents

'清空A列数据

Cells(1, 1) = "目录"

'第一个单元格写入字符串"目录"

i = 1

'将i的初值设置为1.

For Each sht In Worksheets

'循环当前工作簿的每个工作表

strShtName = sht.Name

If strShtName <> ActiveSheet.Name Then

'如果sht的名称不是当前工作表的名称则开始在当前工作表建立超链接

i = i + 1

'累加i

ActiveSheet.Hyperlinks.Add anchor:=Cells(i, 1), Address:="", SubAddress:="'" & strShtName & "'!a1", TextToDisplay:=strShtName

'建超链接

End If

Next

Application.DisplayAlerts =True

End Sub

以上就是今天要和大家分享的技巧，希望对大家有所帮助,祝各位一天好心情！

唯有不断学习，才能不被淘汰!

Excel中每一个函数都有特定的用途，不是它们没有用，而是你不了解或用不着，建议同学们收藏起来，万一要用着了呢

当你进行演示时，需要打开其他文件或应用，你会怎么做？打开文件所在路径，再双击打开那个文件，这是大家最常想到的方法吧，这样做当然可以，但是，这样可能会打断演示的连贯性，影响听众的思路！

当你的Excel文件有很多数据时，你想查看某个特定位置的数据，你会怎么做？鼠标拖拽，睁大眼睛，Ctrl+F查找，这些是大家常常使用的办法吧，这样做当然可以，但是，你的眼睛会有点酸，你的心情会有点烦！

是时候学学怎么使用Excel超链接了，改进方法，提高效率！

一、链接到网站

1、选择要插入超链接的单元格，切换到功能菜单的“插入”页签，点击“链接”按钮，打开“插入超链接”对话框；

2、在左侧选择链接到现有文件或网页，在“要显示的文字中”维护单元格链接文字；

3、点击“屏幕提示”按钮，输入屏幕提示文字；

4、在“地址”文本框中输入要链接的网站地址；

PS：

也可以插入一个形状（或者图片），再插入超链接；使用Ctrl+K快捷键，也可以快速打开“插入超链接”对话框；

二、链接到Word、PPT、Excel、视频文件

方法同上，只是插入超链接时，可以在“查找范围”中选择要链接的文档所在的路径，并在文件列表中选择待链接的文件即可；同样地，也可以先插入形状，再基于形状设置超链接，形成按钮链接的效果。

三、到当前文件特定位置的跳转链接

在“插入超链接”对话框中，选择链接到“本文档中的位置”，在“请键入单元格引用”文本框中输入要链接到的单元格地址或区域地址，维护单元格要显示的文字，当本文档有多个工作表时，还需要在“或在此文档中选择一个位置”区域中，选择要链接到的那个工作表。当链接到一个单元格区域时，整个区域会被选中。

四、动态超链接

结合“定义名称”，我们可以让超链接变得更加灵活；比如以下销售清单数据量很大，要想快速定位到某个订单号所在的行，我们就可以使用动态超链接了，大家先看效果：

这里的订单号是手工输入的，若查询的分类项较少，我们还可以结合下拉选项进行选择定位的；

下面我们看看这个功能是怎么实现的：

第1步：选中任意单元格，如K1单元格，定义名称；

第2步：在K2单元格插入形状，输入文字，作为查询按钮使用，并维护查询按钮的超链接，使之链接到上一步定义的名称：

第3步：修改名称定义，设置link名称的引用位置公式为：

=INDEX(动态超链接!$A:$A,MATCH(动态超链接!$J$2,动态超链接!$A:$A,0))

公式解释：

Match部分根据J2单元格的值，在A列进行精确查找，并返回找到的相对位置的值；Index部分根据Match返回的位置值，返回A列该位置的单元格引用；

通过这种方式，使得link名称可以动态引用到A列的符合订单号查询条件的相应单元格，那么，查询按钮链接到link名称，就能做到根据查询条件，动态定位到指定单元格了。

第4步：在J2单元格输入查询订单号，点击按钮，测试一下，搞定！

以上几种超链接方法，你学会了吗？学以致用，不断提升你的职场技能！

先给大家讲个故事：木兰从军回到京中，被皇上发现竟是女儿身，皇上大怒，命木兰及其部下一日绣花10幅，否则全部赐死，木兰不愿部下送死，毅然说道：臣独绣。

哈哈哈哈嗝，今天S姐又开始天秀了，一定怼到你们想抱着我哭！

“你们 99% 的人做表，都逃不过这 5 个效率低下的坑！赶紧来核实一下，再把解决方案带走！”

第一坑：

合并不同单元格内容

你说：不可能！合并单元格这么简单的事情，我绝不会犯错！

S姐说：不可能，你一定错了，不信先看错误（低效率）做法！

低效做法：

复制粘贴大法。

这种做法四五行还好，如果几十行呢？我的小宝贝们的手岂不是要复制粘贴断了？

大神做法：

先把单元格的宽度拉大，点击【填充】-【两端对齐】。一秒钟后，见证奇迹的时刻：数据都整合到一个单元格啦！比复制粘贴不知道快了多少倍。

第二坑：查看数据

你说：不可能！看数据这么弱智的操作我能犯错？！

S姐说：真的，信我，你错的离谱！

低效做法：“拉条大法”

想看表格尾部数据，通过拖拉滚动条，拉半天拉到底查看。

大神做法：

双击任一单元格的最下边框，即可达到表格最后一行。

第三坑：复制表格

复制到其他 Sheet 的表格，粘贴后发现格式乱了。于是，花大量时间来调整表格.....

低效做法：

不想描述……你们看图吧，是不是放佛看到了自己？

大神做法：

粘贴表格后，点击右下角，选择【保留源列宽】。

第四坑：

离散单元格填充相同的数字

低效做法：

找一个填一个，人工播种。

大神做法：自动化种植

【Ctrl】+【G】对空值进行定位，输入 0 后，按【Ctrl】+【Enter】进行快速填充。

第五坑：取消超链接

在 Excel 或 Word 中，输入网址或者 mail 地址，会自动超链接链接，怎么取消？

低效做法：

出现链接时，右击选择【取消超链接】。

大神做法：

直接按【Ctrl】+【Z】，即可取消链接。

好了，就先秀到这儿吧，看完你们想不想打我？打不着耶略略略~(￣▽￣)ノ

觉得自己膝盖中箭的请自觉分享到票圈，拯救一下还在低效率的大坑内无法自拔的小伙伴！么么哒~笔芯

1 实例说明

如下面工作簿，通过VBA自动创建工作表目录并创建链接，点击链接可以自动跳到对应的工作表。另外创建一个删除全部链接的过程。

2 程序代码

2.1 创建工作表目录并建立链接

Sub Excel创建工作表目录并建立链接()Application.ScreenUpdating = FalseOn Error Resume NextApplication.DisplayAlerts = FalseSheets("工作表目录").DeleteApplication.DisplayAlerts = TrueSheets.Add(before:=Sheets(1)).Name = "工作表目录"Range("A1:B1") = [{"编号","目录"}]For i = 2 To Sheets.CountCells(i, 1).Value = i - 1ActiveSheet.Hyperlinks.Add Anchor:=Cells(i, 2), Address:="", SubAddress:=Sheets(i).Name & "!A1", TextToDisplay:=Sheets(i).Name, ScreenTip:="单击打开" & Sheets(i).NameNextEnd Sub

2.2 删除超级链接

Sub 删除超级链接()Dim XFor Each X In ActiveSheet.HyperlinksX.DeleteNext xEnd Sub

3 代码分析

添加和删除链接是通过工作表对象的Hyperlinks集合对象的Add和delete方法来实现的。Hyperlinks集合对象代表工作表或区域的超级链接集合。

还是那句老话，动手是检验真理的唯一标准。有些时候，常识也是错的，甚至，微软帮助也可能出错。今天，继续聊超级链接。

1.没有路径，就不能打开图片？

如果遇到别人，可能是无法反驳，可惜你遇到的是卢子。默认情况下，超级链接都是需要路径才能打开相应的文件，但这不是必须的，而且使用路径有存在缺陷。

默认的公式是这样写：

=HYPERLINK("C:\Users\87224\Desktop\Excel不加班常用图片\透视表班级.jpg","打开")

现在问题来了，文件夹的位置不是一成不变，一旦你移动了，就不能打开，因为路径已经改变。

现在将Excel不加班常用图片这个文件夹移动到处理完这个文件夹。

点击超级链接，立马弹出警告对话框无法打开指定的文件。

现在来看使用原来没有路径的方法，移动的位置是一样的。

为了让你看得更清楚，这里使用一个动画，防止你说我作弊。点击超级链接，非常顺利就打开相应的图片。

不使用路径有一个前提，这里再强调一次，工作簿必须跟图片同一个文件夹。同一个文件夹自然路径相同，也就可以不用路径。

2.超级链接除了能链接图片，还能链接到什么？

现在以Excel格式进行说明，还是原来的公式。

=HYPERLINK(A2,"打开")

Excel比较特殊，可以存放多个工作表，假设现在想链接到资产明细这个表的H2单元格，该如何操作？

将标签副本.xlsm这个工作簿打开，用鼠标引用资产明细表的H2公式是这样的。

=[标签副本.xlsm]资产明细!$H$2

说明：

[工作簿.后缀]工作表名称!单元格

也就是将公式设置为这样就可以。

=HYPERLINK("["&A2&"]资产明细!H2","打开")

超级链接除了能链接文件，也能链接到网页，比如现在要购买跟卢子学Excel套装书。

=HYPERLINK("https://item.jd/12330717.html","购书")

关于Word中的超链接，相信很多小伙伴都遇到过吧，比如直接从网页上复制的网址，邮箱等，到了Word文档里面，就变成了蓝色的超链接，一不小心点上去就蹦到了其他页面，很令人讨厌。

那么既然有问题，就有解决办法，通常我们都会一个一个选中超链接然后鼠标右键进行取消，操作如下：

但是超链接少的时候还好，链接一多，一个一个的取消就非常麻烦了，所以，小编接下来教大家一招，只需一个快捷键，即可取消所有超链接，一起来学习一下吧。

快速取消所有超链接简单方法：

首先选中所有文本，然后利用快捷键【Ctrl + 6】或者【Ctrl + Shift + F9】，就能把所有超链接取消啦。

具体操作如下：

怎么样？是不是涨姿势了，学会的朋友帮忙转发分享一下，你们的支持，就是我最大的动力！

我们在办公中经常会查看表格信息，有时反映出来的信息非常多，但我们想要知道的只是几个重要的信息，如果直接点击单元格就能跳转到我们需要的位置，将大大的方便我们的查看工作。小编在之前为大家介绍过在PPT中使用超链接的功能，那么在Excel中是否也能够实现点击一个单元格，跳转到链接的另一个单元格呢？ 今天小编就和大家一起探究一下单元格的超链接~

选中需要添加超链接的单元格，单击【插入】选项卡，在【链接】组中点击【超链接】按钮，弹出【插入超链接】对话框，选择【本文当中的位置】，此时【请键入引用单元格】输入C21。点击右上角的【屏幕提示】按钮，，弹出【设置超链接屏幕提示】对话框，在文本框中输入提示信息：7月汇总，点击确定按钮。当鼠标指针移动到设置超链接的单元格时，会出现提示信息，并在设置了超链接的单元格中的文本颜色发生了改变。

不知道各位小伙伴有没有发现，如果这时我们插入行或列时，单元格位置有变动后，超链接并没有随着改变。我们需要结合另外一个功能【定义名称】。选中设置超链接被引用的单元格，单击鼠标右键，在快捷菜单中点击【定义名称】按钮，此时弹出【新建名称】对话框，在此输入符合规范的名称：_7月汇总，范围为：sheet1，点击确定按钮。

接下来，我们进入到【插入超链接】对话框，在【或此文档中选择一个位置】复选框中，选择【已定义名称】：7月汇总，点击【确定】即可。

欢迎关注，以上。

在我们平时输入邮箱或网址的时候，经常会碰到一件事儿，就是邮箱或网址是超链接的。一点击，就出现了网站或其他的。

那么该如何取消多个单元格的超链接呢？

①选择性粘贴

选择一个空白单元格，复制——选中超链接区域，右键，选择性粘贴——运算，加

最后确定

这是格式会没有，自己修改下即可，现在是文本格式哦！

②直接“清除超链接”

选中超链接区域，开始——清除——清除超链接

这个有一个好处，看似没变，实际已去除超链接的特性，只是没有像①一样，格式也会清除，如果真的需要联格式一起清除的话，可以选择另外的“删除超链接”

但是能不能从根源上阻止这个超链接的创建呢？

在默认的情况下，在单元格输入网址或邮箱地址后，会自动产生一个超链接。在联网的情况下，一不小心单击该超链接则会自动的启动网页浏览器或Outlook之类的邮件客户端软件，造成不必要的麻烦。

①输入英文状态下单引号或前面敲个空格

②自动更正设置

文件——选项——校对——自动更正选项——键入时自动套用格式——Internet及网络路径替换为超链接（不要勾选）

设置完后输入网址，就不会有超链接了哦！

问题的解决方法有很多种，你只要会一种自己觉得方便的即可！

更多Excel的学习和问题交流请加群！558669700

有什么见解和问题可以写在下面的讨论区哦！

Excel单元格中输入网址时会自动的转化为超级链接，有时因为工作的需要，取消掉所有的超级链接。一个两个的好解决，点击右键就能轻松搞定，但要是大批量的取消就比较烦人了。批量取消超链有好几种方法，今天讲两种比较简单的方法。

下面开始设置：点击office按钮——Excel选项——“校对”标签里的“自动更正选项”——选择“键入时自动套用格式”——把“Internet及网络路径替换为超链接工作时应用”前面的复选框勾去掉。

设置1

设置2

设置3

设置完成后Excel中的超链还没有取消掉，因为这是还没有设置前键入的，所以还需要一步才能去掉超链。把超级链接复制到文本文档里，再从文本文档里复制回来就可以了。

不过设置后再输入网址类的数据就不会是超链的形式了，这种方式最好就是输入前设置。

重新录入网址已无超链形式

另一种方法更简单，不用设置。就是利用复制粘贴，粘贴时选择——选择性粘贴——数值，把原来的超链删除，再复制过来就行了。

Excel科技收藏

如何快速删除Excel里面的超链接？

相信在Excel里面大家进行邮箱地址输入的时候，软件就会自动默认未一个超链接，这种无疑为大家带来困惑，而且还需要进行一些列操作才能删除超链接。本次讲解让大家学会一些技巧删除系统默认生产的超链接或者别人文件就已经带出来的超链接，而且误点击了这几个超链接，就会进行该网址的浏览。无疑给我们的操作带来一系列的困扰。

删除超链接，大家都希望快而好的操作就能省事，因为超链接有时候确实是挺烦人的。本次讲解涉及几个方式，分别是系统参数设置、基本删除操作、组合键删除操作方法、选择性粘贴、格式刷操作、宏设置删除法等。

首先是第一种Excel系统参数的设置方法，此方法操作步骤是开始→Excel选项→校对→自动更正选项，键入时自动套用格式，以键入值替换剔除“√”选项。

GIF

第二种手动基本删除超链接的方法。步骤是选中超链接单元格，右键→取消超链接。

GIF

第三种方法是组合键删除超链接方法，步骤是选中超链接单元格，然后Ctrl + C，再按一下Enter键即可。温馨提醒，这几个步骤是一步一键，并不是Ctrl + C 和Enter同时按下；是单独进行操作的。

GIF

第三种方法是选择性粘贴，大家首先选中超链接单元格，复制该单元格，粘贴选择选择性粘贴的值粘贴方式，然后就可以删除相应的超链接了。

GIF

第四种方法是使用格式刷。格式刷的使用大家都并不陌生，首先将某一单元格的超链接人工手动进行删除，然后选中已经删除超链接的单元格，按一下「格式刷」，拖动需要删除超链接的单元格即可。

GIF

第五种方法是利用宏进行自动删除超链接，步骤：开发工具→代码，宏→命名一个宏名称，“删除超链接”，创建→Sub 删除超链接() End Sub，在这两者中间键入，“Cells.Hyperlinks.Delete”；保存宏即可。然后可以执行该宏操作了。

GIF

超链接有时候会带来便利，有时候带来困扰，大家在使用删除的时候，结合实际情况，不要盲目使用删除功能，因为可能把超链接带来的便利一起被删除，这样得不偿失。

Excel的学习离不开练习，大家在练习的时候可以思考还有什么操作可以带来同样的效果。因为Excel操作并不是唯一的，不同的人可能有不同的操作方法。