给Excel 2007多个工作表快速创建目录
时间:2022-12-18 23:23:36
我们经常把同类相关Excel工作表集中保存在同一文档中,以便于在各表格间进行引用、查看。当一个文档中的工作表达到一定数量时,要想找到需要的工作表就变得很麻烦了。此时若能建立一张“目录”工作表显示所有工作表的名称和链接,事情将会简单很多。
下面介绍一种可以快速为Excel工作簿创建工作表目录的方法。
定义名称
打开Excel 2007,右击第一张工作表标签选择“重命名”,把它重命名为“目录”工作表。选中B1单元格,切换到“公式”选项卡,单击“定义名称”,在弹出的“新建名称”窗口中输入名称“工作表名”,在引用位置中则输入公式=INDEX(GET.WORKBOOK(1),$A1)&T(NOW()),单击确定即可定义出一个名为“工作表名”的名称(图1)。
公式中GET.WORKBOOK(1)用于提取当前工作簿中所有工作表名称,INDEX函数则按A1中的数字决定要显示第几张工作表的名称。此外,由于宏表函数GET.WORKBOOK(1)在数据变动时不会自动重算,而NOW()是易失性函数任何变动都会强制计算,因此我们需要在公式中加上NOW()函数才能让公式自动重算。函数T()则是将NOW()产生的数值转为空文本以免影响原公式结果。
目录设置
在“目录”工作表的A1单元格输入1,在B1单元格输入公式=IFERROR(HYPERLINK(工作表名&"!A1",RIGHT(工作表名,LEN(工作表名)-FIND("]",工作表名))),"")。公式表示当名称“工作表名”的值为错误值时显示为空“”,否则创建指向“工作表名!A1”的超链接并显示该“工作表名”。
然后选中A1:B1单元格,把鼠标指向选中区右下角的“填充柄”按住鼠标左键向下拖动到300行,把公式和编号填充出300行,在A、B列就会马上自动列出所有工作表目录(图2)。单击相应工作表名称即可快速切换到该工作表中。请参照可能的最多工作表个数来决定向下填充行数,一般300个应该够了。
注:公式中RIGHT(工作表名,LEN(工作表名)-FIND("]",工作表名))这段函数的作用是除去“工作表名”中“]”以前的内容。若你不介意工作表名称前显示“[BOOK1.xlsx]”一类内容的话,可以把B1中的公式简化成=IFERROR(HYPERLINK(工作表名&"!A1",工作表名),"")。
保存设置
切换到“开始”选项卡适当设置一下目录中的字体、字号和颜色等等,建议把字号放大并设置加粗以便查看,还要调整一下A:B列的列宽以便完全显示工作表名称。然后右击其他工作表标签选择“删除”,把所有其他工作表全部删除只保留一张“目录”工作表。最后单击“Office”按钮,选择“另存为”,在弹出的另存为窗口中选择保存类型为“Excel启用宏的模板(*.xltm)”格式、文件名为“目录.xltm”,保存到C:Program FilesMicrosoft OfficeOffice12XLSTART文件夹下,关闭Excel 2007退出。若你的Office不是按默认路径安装,请按实际安装路径修改。
三秒创建目录
以后要为工作簿创建目录就简单了,只要用Excel 2007打开要创建目录的工作簿,在第一张工作表的标签上右击选择“插入”,在“插入”窗口中双击选择“目录”,即可在第一张工作表前插入一张“目录”工作表,并显示出所有工作表目录。这操作有3秒就够了吧?
在“目录”工作表中,可通过对目录进行筛选、排序、查找来快速找到工作表名,然后单击工作表名即可打开相应工作表。创建目录后,在这个工作簿中增加、删除工作表或者修改工作表名称,“目录”工作表中的工作表目录都会自动更新。此外,前面我们只复制了300行目录公式,因此工作表总数超过300个时,超出的工作表名就不会显示了,得把“目录”工作表中A1:B1的公式再向下复制填充才行。
由于宏表函数GET.WORKBOOK(1)是通过宏功能起作用的,所以插入了工作表目录的文档最后都必须以“Excel启用宏的工作簿(*.xlsm)”格式另存,这样下次打开时才能正常显示工作表目录。此外,打开工作簿时,Excel 2007默认会禁用宏,得单击警告栏中的“选项”按钮,选中“启用此内容”单选项,确定后才能显示工作表目录。
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
win10系统打开网页无法播放声音怎么办?
![](https://img.aspxhome.com/file/2023/6/46786_0s.jpg)
Word使用技巧集锦
word设置单页横向的两种方法
如何去除WPS打印预览分割线
![](https://img.aspxhome.com/file/2023/0/a163900_0s.png)
如何使Word表格中数据按小数点对齐
![](https://img.aspxhome.com/file/2023/3/21873_0s.jpg)
word文档中出现宏被禁止了怎么办
![](https://img.aspxhome.com/file/2023/8/18608_0s.jpg)
word文档中各种控件插入教程
![](https://img.aspxhome.com/file/2023/3/17803_0s.jpg)
win10系统Edge浏览器出现乱码怎么办?win10系统Edge浏览器乱码修复教程
![](https://img.aspxhome.com/file/2023/6/46726_0s.png)
用Word模板功能建立自己的模板
如何打开不同格式的Word文档
![](https://img.aspxhome.com/file/2023/0/19830_0s.jpg)
在Word中千分号和万分号的打法步骤
word中分数怎么打
![](https://img.aspxhome.com/file/2023/7/33767_0s.jpg)
Word或者WPS如何设置阴影空心的特大字体?
![](https://img.aspxhome.com/file/2023/9/28659_0s.jpg)
Win10虚拟键盘怎么开启?win10打开虚拟键盘的方法
![](https://img.aspxhome.com/file/2023/9/49759_0s.png)
word设置一页分两栏的三种方法
word如何设置中文信封?word中文信封设置方法
![](https://img.aspxhome.com/file/2023/7/23297_0s.png)
Word中进行添加和删除水印的操作方法
Word动画教程:在word2003中如何用模板制作信纸、稿纸
![](https://img.aspxhome.com/file/2023/3/29203_0s.gif)
iPhone14 如何开启音量键连拍?
![](https://img.aspxhome.com/file/2023/4/44724_0s.png)