展开全部
Excel工作表目录实现方法
方法一:函数公式法(1)
步骤如下:
1、定义名称“directory lists”
2、在引用位置写入名称公式=REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),)&T(NOW())
3、新建一个工作表,将此工作表改名为“工作表目录”,并将此工作表放在首位。
4、在“工作表目录”A2单元格输入公式=IF(ROW()>COUNTA(directory lists),"",INDEX(directory lists,ROW()))
5、B2单元格输入公式=HYPERLINK("#"&A2&"!a1","进入")
方法一是网络上常见的方法,实际还有比这更简洁的方法,请看以下方法二
方法二、函数公式法(2)
步骤如下:
1、定义名称“directory”
2、在引用位置写入名称公式=GET.WORKBOOK(3)
3、新建一个工作表,将此工作表改名为“工作表目录”,并将此工作表放在首位。
4、在“工作表目录”A2单元格输入公式=IF(ROW()>COUNTA(directory ),"",INDEX(directory ,ROW()))
5、B2单元格输入公式=HYPERLINK("#"&A2&"!a1","进入")
方法二是我在试验GET.workbook(N )中的N参数得出的
方法三:VBA法(3)
Sub 目录()
Range("a1:b1").EntireColumn.Clear
Cells(1, 1) = "序号"
Cells(1, 2) = "工作表名称"
Dim rng As Worksheet
Dim L As String
I = 2
For Each rng In Worksheets
L = rng.Name
L1 = """" & L & """"
L2 = """#""" & "&"""
Cells(1, 4) = "'=HYPERLINK(" & L2 & L & "!a1""" & "," & L1 & ")"
If L <> "目录" Then
Cells(I, 2).Formula = "=HYPERLINK(" & L2 & L & "!a1""" & "," & L1 & ")"
Cells(I, 1) = I - 1
I = I + 1
End If
Next
ActiveSheet.Move before:=Sheets(1) '将目录工作表移到所有工作表的最前面
End Sub
方法三采用了VBA,用以上代码实现工作表目录也不错,是最近一片白云编写调试做的。供朋友们学习与借鉴。
相关知识点:
知识点1:函数HYPERLINK使用
1、创建一个快捷方式(跳转),用以打开存储在网络服务器、Intranet(Intranet:一种组织内部的、使用 Internet技术(如 HTTP或 FTP协议)的网络。通过利用超链接,您可以在 Intranet上浏览对象、文档、网页和其他目标内容。) 或 Internet中的文件。当单击函数 HYPERLINK所在的单元格时,Microsoft Excel将打开存储在 link_location中的文件。
语法HYPERLINK(link_location,friendly_name)
Link_location 为文档的路径和文件名,此文档可以作为文本打开。Link_location还可以指向文档中的某个更为具体的位置,如 Excel工作表或工作簿中特定的单元格或命名区域,或是指向 Microsoft Word文档中的书签。路径可以是存储在硬盘驱动器上的文件,或是服务器(在 Microsoft Excel for Windows中)上的“通用命名规范”(UNC)路径,或是在 Internet或 Intranet上的“统一资源定位符”(URL(统一资源定位符 (URL):一种地址,指定协议(如 HTTP或 FTP)以及对象、文档、万维网网页或其他目标在 Internet或 Intranet上的位置,例如:http://www.microsoft.com/。))路径。
Link_location 可以为括在引号中的文本字符串,或是包含文本字符串链接的单元格。
如果在 link_location中指定的跳转不存在或不能访问,则当单击单元格时将出现错误信息。
Friendly_name 为单元格中显示的跳转文本值或数字值。单元格的内容为蓝色并带有下划线。如果省略 Friendly_name,单元格将 link_location显示为跳转文本。
Friendly_name 可以为数值、文本字符串、名称或包含跳转文本或数值的单元格。
如果 Friendly_name返回错误值(例如,#VALUE!),单元格将显示错误值以替代跳转文本。
说明
若要选定一个包含超链接的单元格并且不跳往超链接的目标文件,请单击单元格区域并按住鼠标按钮直到光标变成一个十字,然后释放鼠标按钮。
示例
下面的示例打开存储在 Internet的 example.microsoft.com/report地址上的工作表 Budget Report.xls,并显示文本“Click for report”:
=HYPERLINK("http://example.microsoft.com/report/budget report.xls", "Click for report")
下面的示例创建对工作簿 Budget Report.xls的 Annual工作表中单元格 F10的超链接,该工作簿存储在 Internet的 example.microsoft.com/report地址上。工作表中包含超链接的单元格将以单元格 D1的内容作为其显示的跳转文本:
=HYPERLINK("[http://example.microsoft.com/report/budget report.xls]Annual!F10", D1)
下面的示例创建对工作簿 Budget Report.xls的 First Quarter工作表中 DeptTotal区域的超链接,该工作簿存储在 Internet的 example.microsoft.com/report地址上。工作表中包含超链接的单元格将显示跳转文本“Click to see First Quarter Department Total”:
=HYPERLINK("[http://example.microsoft.com/report/budget report.xls]First Quarter!DeptTotal", "Click to see First Quarter Department Total")
若要对 Microsoft Word文档中的特定位置创建超链接,必须使用书签来定义文档中所要跳转的位置。下面的示例创建对 example.microsoft.com上名为 Annual Report.doc的文档中的书签 QrtlyProfits的超链接:
=HYPERLINK("[http://example.microsoft.com/Annual Report.doc]QrtlyProfits", "Quarterly Profit Report")
在 Excel for Windows中,下面的示例可以将单元格 D5中的内容显示为超链接单元格中的跳转文本,并打开名为 1stqtr.xls的文件,该文件存储在 FINANCE服务器的 Statements共享文件夹中。此示例使用 UNC路径:
=HYPERLINK("\\FINANCE\Statements\1stqtr.xls", D5)
下面的示例打开 Excel for Windows的文件 1stqtr.xls,该文件存储在驱动器 D的名为 Finance的目录下,并显示存储在单元格 H10中的数字值:
=HYPERLINK("D:\FINANCE\1stqtr.xls", H10)
在 Excel for Windows中,下面的示例将创建指向另一个(外部)工作簿 Mybook.xls中名为 Totals的区域的超链接:
=HYPERLINK("[C:\My Documents\Mybook.xls]Totals")
在 Microsoft Excel for Macintosh中,下面的示例将在单元格中显示“Click here”,并打开保存在名为 Macintosh HD硬盘上 Budget Reports文件夹中的 First Quarter文件:
=HYPERLINK("Macintosh HD:Budget Reports:First Quarter", "Click here")
可以在工作表内创建超链接,以便从一个单元格跳转到另一个单元格。例如,如果 Budget工作簿中的 June工作表为活动工作表,则下面的公式将创建跳转到单元格 E56的超链接,链接的文本本身为单元格 E56中的数值。
=HYPERLINK("[Budget]June!E56", E56)
若要跳转到同一工作簿中的其他工作表,请更改超链接中的工作表名称。在前例中,若要创建指向 September工作表中单元格 E56的链接,请将单词“June”更改为“September”。
知识点2:GET函数部分知识点
1、get.workbook(1)是宏表函数之一,作用是提取当前工作薄所有工作表的表名(工作表名前面包括工作簿名),以水平数组的形式储存。
2、get.workbook(3)是宏表函数之一,作用是提取当前工作薄所有工作表的表名(工作表名前不包括工作簿名),以水平数组的形式储存。
方法一:函数公式法(1)
步骤如下:
1、定义名称“directory lists”
2、在引用位置写入名称公式=REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),)&T(NOW())
3、新建一个工作表,将此工作表改名为“工作表目录”,并将此工作表放在首位。
4、在“工作表目录”A2单元格输入公式=IF(ROW()>COUNTA(directory lists),"",INDEX(directory lists,ROW()))
5、B2单元格输入公式=HYPERLINK("#"&A2&"!a1","进入")
方法一是网络上常见的方法,实际还有比这更简洁的方法,请看以下方法二
方法二、函数公式法(2)
步骤如下:
1、定义名称“directory”
2、在引用位置写入名称公式=GET.WORKBOOK(3)
3、新建一个工作表,将此工作表改名为“工作表目录”,并将此工作表放在首位。
4、在“工作表目录”A2单元格输入公式=IF(ROW()>COUNTA(directory ),"",INDEX(directory ,ROW()))
5、B2单元格输入公式=HYPERLINK("#"&A2&"!a1","进入")
方法二是我在试验GET.workbook(N )中的N参数得出的
方法三:VBA法(3)
Sub 目录()
Range("a1:b1").EntireColumn.Clear
Cells(1, 1) = "序号"
Cells(1, 2) = "工作表名称"
Dim rng As Worksheet
Dim L As String
I = 2
For Each rng In Worksheets
L = rng.Name
L1 = """" & L & """"
L2 = """#""" & "&"""
Cells(1, 4) = "'=HYPERLINK(" & L2 & L & "!a1""" & "," & L1 & ")"
If L <> "目录" Then
Cells(I, 2).Formula = "=HYPERLINK(" & L2 & L & "!a1""" & "," & L1 & ")"
Cells(I, 1) = I - 1
I = I + 1
End If
Next
ActiveSheet.Move before:=Sheets(1) '将目录工作表移到所有工作表的最前面
End Sub
方法三采用了VBA,用以上代码实现工作表目录也不错,是最近一片白云编写调试做的。供朋友们学习与借鉴。
相关知识点:
知识点1:函数HYPERLINK使用
1、创建一个快捷方式(跳转),用以打开存储在网络服务器、Intranet(Intranet:一种组织内部的、使用 Internet技术(如 HTTP或 FTP协议)的网络。通过利用超链接,您可以在 Intranet上浏览对象、文档、网页和其他目标内容。) 或 Internet中的文件。当单击函数 HYPERLINK所在的单元格时,Microsoft Excel将打开存储在 link_location中的文件。
语法HYPERLINK(link_location,friendly_name)
Link_location 为文档的路径和文件名,此文档可以作为文本打开。Link_location还可以指向文档中的某个更为具体的位置,如 Excel工作表或工作簿中特定的单元格或命名区域,或是指向 Microsoft Word文档中的书签。路径可以是存储在硬盘驱动器上的文件,或是服务器(在 Microsoft Excel for Windows中)上的“通用命名规范”(UNC)路径,或是在 Internet或 Intranet上的“统一资源定位符”(URL(统一资源定位符 (URL):一种地址,指定协议(如 HTTP或 FTP)以及对象、文档、万维网网页或其他目标在 Internet或 Intranet上的位置,例如:http://www.microsoft.com/。))路径。
Link_location 可以为括在引号中的文本字符串,或是包含文本字符串链接的单元格。
如果在 link_location中指定的跳转不存在或不能访问,则当单击单元格时将出现错误信息。
Friendly_name 为单元格中显示的跳转文本值或数字值。单元格的内容为蓝色并带有下划线。如果省略 Friendly_name,单元格将 link_location显示为跳转文本。
Friendly_name 可以为数值、文本字符串、名称或包含跳转文本或数值的单元格。
如果 Friendly_name返回错误值(例如,#VALUE!),单元格将显示错误值以替代跳转文本。
说明
若要选定一个包含超链接的单元格并且不跳往超链接的目标文件,请单击单元格区域并按住鼠标按钮直到光标变成一个十字,然后释放鼠标按钮。
示例
下面的示例打开存储在 Internet的 example.microsoft.com/report地址上的工作表 Budget Report.xls,并显示文本“Click for report”:
=HYPERLINK("http://example.microsoft.com/report/budget report.xls", "Click for report")
下面的示例创建对工作簿 Budget Report.xls的 Annual工作表中单元格 F10的超链接,该工作簿存储在 Internet的 example.microsoft.com/report地址上。工作表中包含超链接的单元格将以单元格 D1的内容作为其显示的跳转文本:
=HYPERLINK("[http://example.microsoft.com/report/budget report.xls]Annual!F10", D1)
下面的示例创建对工作簿 Budget Report.xls的 First Quarter工作表中 DeptTotal区域的超链接,该工作簿存储在 Internet的 example.microsoft.com/report地址上。工作表中包含超链接的单元格将显示跳转文本“Click to see First Quarter Department Total”:
=HYPERLINK("[http://example.microsoft.com/report/budget report.xls]First Quarter!DeptTotal", "Click to see First Quarter Department Total")
若要对 Microsoft Word文档中的特定位置创建超链接,必须使用书签来定义文档中所要跳转的位置。下面的示例创建对 example.microsoft.com上名为 Annual Report.doc的文档中的书签 QrtlyProfits的超链接:
=HYPERLINK("[http://example.microsoft.com/Annual Report.doc]QrtlyProfits", "Quarterly Profit Report")
在 Excel for Windows中,下面的示例可以将单元格 D5中的内容显示为超链接单元格中的跳转文本,并打开名为 1stqtr.xls的文件,该文件存储在 FINANCE服务器的 Statements共享文件夹中。此示例使用 UNC路径:
=HYPERLINK("\\FINANCE\Statements\1stqtr.xls", D5)
下面的示例打开 Excel for Windows的文件 1stqtr.xls,该文件存储在驱动器 D的名为 Finance的目录下,并显示存储在单元格 H10中的数字值:
=HYPERLINK("D:\FINANCE\1stqtr.xls", H10)
在 Excel for Windows中,下面的示例将创建指向另一个(外部)工作簿 Mybook.xls中名为 Totals的区域的超链接:
=HYPERLINK("[C:\My Documents\Mybook.xls]Totals")
在 Microsoft Excel for Macintosh中,下面的示例将在单元格中显示“Click here”,并打开保存在名为 Macintosh HD硬盘上 Budget Reports文件夹中的 First Quarter文件:
=HYPERLINK("Macintosh HD:Budget Reports:First Quarter", "Click here")
可以在工作表内创建超链接,以便从一个单元格跳转到另一个单元格。例如,如果 Budget工作簿中的 June工作表为活动工作表,则下面的公式将创建跳转到单元格 E56的超链接,链接的文本本身为单元格 E56中的数值。
=HYPERLINK("[Budget]June!E56", E56)
若要跳转到同一工作簿中的其他工作表,请更改超链接中的工作表名称。在前例中,若要创建指向 September工作表中单元格 E56的链接,请将单词“June”更改为“September”。
知识点2:GET函数部分知识点
1、get.workbook(1)是宏表函数之一,作用是提取当前工作薄所有工作表的表名(工作表名前面包括工作簿名),以水平数组的形式储存。
2、get.workbook(3)是宏表函数之一,作用是提取当前工作薄所有工作表的表名(工作表名前不包括工作簿名),以水平数组的形式储存。
展开全部
Excel是适用于制作表格和数据运算,不适合编辑文字文档。
建议你在Word里面设置。
可以插入页码:
菜单栏——文件——页面设置——页眉/页脚——页脚(或自定义页脚)。
建议你在Word里面设置。
可以插入页码:
菜单栏——文件——页面设置——页眉/页脚——页脚(或自定义页脚)。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
下载慧办公,然后重新打开excel,可以看到菜单栏有慧办公,之后就可以直接在excel中插入目录了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
优质机构答主
2019-05-08 · 百度认证:广东太平洋互联网信息服务有限公司官方账号,优质数码...
关注
展开全部
华为Mate50 Pro曲面旗舰手机
¥6799
苹果 AirPods Pro 2代
¥1699
索尼65英寸4K HDR专业游戏电视
¥7499
惠普战66五代15.6英寸轻薄本
¥4399
查
看
更
多
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
是不是得导入word中
==========
试试吧,但愿能够帮助您!
==========
试试吧,但愿能够帮助您!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |