excel表太多怎样建目录
Ⅰ 怎样制作excel工作表目录
1.右键单击工作表左下角的两个小三角及之间的区域,Excel就会弹出一个类似工作表目录的界面;单击界面上的相应表名可以激活对应的工作表。
2.使用相应代码也可以制作EXCEL工作表目录。
所使用代码如下:
Sub ml()
Dim sht AsWorksheet, i&, n$
Columns(1).ClearContents
'清空A列数据
Cells(1, 1)= "目录"
'第一个单元格写入字符串"目录"
i = 1
'将i的初值设置为1.
For Each shtIn Worksheets
'循环当前工作簿的每个工作表
n =sht.Name
If n<> ActiveSheet.Name Then
'如果sht的名称不是当前工作表的名称则开始建立超链接
i =i 1
'累加i
ActiveSheet.Hyperlinks.Add anchor:=Cells(i, 1), Address:="", _
SubAddress:=”’” & n & "’!a1", TextToDisplay:=n
'建超链接
End If
Next
End Sub
Ⅱ 在excel工作薄中如何给多个工作表编目录
使用vba 或宏表函数解决。
以2007版本宏表函数为例,已经尽量清楚明白说明,还看不懂,就自己研究,不要追问,谢谢!
1、定义函数GET.WORKBOOK
开始==》公式==》定义名称==》名称我用了 aa ,自己酌情修改==》引用位置输入:
=GET.WORKBOOK(1)
2、在需要目录的地方输入:
=INDEX(aa,ROW(A1))&T(NOW())
然后下拉若干行(数量取决于工作表数量,超过后会出现错误代码)如果工作表数量需要不断更新/增加,参考为了美观的公式:
=IFERROR(INDEX(aa,ROW(A1))&T(NOW()),"")
然后下拉即可。
ps:如果定义名称有问题,请先保存表格,然后再定义名称!