在Excel里快速插入目录

标签（空格分隔）： excel 工具

EXCEL本身没有Word那样插入目录的功能，不过我们可以通过VBA来实现类似功能,步骤如下：

1. 首先打开要创建目录的Excel文件

2. Alt+F11—>插入—>模块—>把下面的代码拷贝到模块中：

Sub mulu()
On Error GoTo Tuichu
Dim i As Integer
Dim ShtCount As Integer
Dim SelectionCell As Range
ShtCount = Worksheets.Count
If ShtCount = 0 Or ShtCount = 1 Then Exit Sub
Application.ScreenUpdating = False
For i = 1 To ShtCount
If Sheets(i).Name = “目录” Then
Sheets(“目录”).Move Before:=Sheets(1)
End If
Next i
If Sheets(1).Name <> “目录” Then
ShtCount = ShtCount + 1
Sheets(1).Select
Sheets.Add
Sheets(1).Name = “目录”
End If
Sheets(“目录”).Select
Columns(“B:B”).Delete Shift:=xlToLeft
Application.StatusBar = “正在生成目录…………请等待！”
For i = 2 To ShtCount
ActiveSheet.Hyperlinks.Add Anchor:=Worksheets(“目录”).Cells(i, 2), Address:=”“, SubAddress:= _
Sheets(i).Name & “!R1C1”, TextToDisplay:=Sheets(i).Name
Next
Sheets(“目录”).Select
Columns(“B:B”).AutoFit
Cells(1, 2) = “目录”
Set SelectionCell = Worksheets(“目录”).Range(“B1”)
With SelectionCell
.HorizontalAlignment = xlDistributed
.VerticalAlignment = xlCenter
.AddIndent = True
.Font.Bold = True
.Interior.ColorIndex = 34
End With
Application.StatusBar = False
Application.ScreenUpdating = True
Tuichu:
End Sub

3.关闭VBA编辑界面

4.在你要插入的电子表格里按ALT+F8快捷键，选好你刚才写的模块mulu

5. 执行，OK,目录建好了。

6. 有图有真相

在Excel里快速插入目录相关推荐

计算机上的符号并不代表分数,如何在Excel里轻松插入符号、分数和特殊字符
如何在Excel里轻松插入符号.分数和特殊字符发布时间:2011-11-14 09:59:25 作者:佚名我要评论 Excel中使用"符号"对话框可以插入键盘上没有的符 ...
计算机上的符号并不代表分数,Excel里轻松插入分数、符号和特殊字符
Excel里轻松插入分数.符号和特殊字符分类:计算机等级 | 更新时间:2016-07-08| 来源:转载 Excel中使用"符号"对话框可以插入键盘上没有的符号(如 ¼ 和 © ...
Excel如何快速插入指定数目空白行
如下图是某公司三个月销售表,现在想要在第四行前面快速新建三个空白行. 点击A4单元格点击下图选项(Excel插件,百度即可了解详细的下载安装方法,本文这里不作详细叙述) 选择[新增插入] 点击[插入 ...
LaTex使用Excel实现快速插入表格
一.下载excel2latex.xla 下载链接:https://ctan.org/tex-archive/support/excel2latex/ 下载链接:https://download.csd ...
Excel如何快速插入图片？
1.打开excel软件,点击[图片工具]选项 2.点击[导入图片]选项 3.在弹出对话框中点击[添加],选择选择插入的图片文件 4.接着我们设置每行图片个数 5.最后设置图片大小,和导入单 ...
Word中快速插入目录
本文转自黄聪博客园博客,原文链接:http://www.cnblogs.com/huangcong/archive/2010/05/22/1741324.html,如需转载请自行联系原作者
excel 多行插入_在Excel中插入多行
excel 多行插入 If you've used Excel for a while, you have lots of skills that you might assume everyone ...
excel：超链接应用，快速生成目录的几个方法
****部落窝教育-excel目录制作技巧**** 原创:壹仟伍佰万/部落窝教育(未经同意,请勿转载) 更多教程:部落窝教育(http://www.itblw.com) 微信公众号:exceljiao ...
qt 表格中插入一行_在EXCEL表格中，快速插入多行、多列的技巧
在使用Excel过程中,我们会遇到需要插入相同格式的多行或多列,如果一行行或一列列的插入,对于插入的数量较少的情况还是适用的.可是如果需要插入上百的行或列,使用此方法就比较费时费力啦.分享几个小技巧实 ...
Excel表格中如何快速插入多个空白行
Excel表格中如何快速插入多个空白行目录 Excel表格中如何快速插入多个空白行 1.例如我们想要在第2行下面插入多个空白行,首先选中第2行整行 2.按住"shift键",鼠标 ...

在Excel里快速插入目录

在Excel里快速插入目录

1. 首先打开要创建目录的Excel文件

2. Alt+F11—>插入—>模块—>把下面的代码拷贝到模块中：

3.关闭VBA编辑界面

4.在你要插入的电子表格里按ALT+F8快捷键，选好你刚才写的模块mulu

5. 执行，OK,目录建好了。

6. 有图有真相

在Excel里快速插入目录相关推荐

最新文章

热门文章