`
zhyt710
  • 浏览: 205941 次
  • 性别: Icon_minigender_1
  • 来自: 北京
社区版块
存档分类
最新评论

Excel自动生成目录

阅读更多

内容取自http://zhangpeeta.blog.sohu.com/128784050.html

 

具体方法如下

 

1,首先在excel文件的最前面追加一个sheet,命名为“目录”

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,复制完成后按F5运行即可,如果后期对表名做了修改,只需要重新F5运行刷新下目录即可。

分享到:
评论

相关推荐

    excel自动生成目录脚本

    ### Excel自动生成目录脚本详解 #### 脚本功能概述 在日常工作中,我们经常需要处理复杂的Excel文档,特别是当一个工作簿包含多个工作表时,如何快速地定位到特定的工作表成为了一个常见的需求。为此,我们可以利用...

    excel也能实现自动生成目录

    在Excel中创建自动生成目录的功能,可以通过VBA(Visual Basic for Applications)编程来实现,这是一种内置于Microsoft Office中的脚本语言。以下是如何在Excel中设置和执行这个自动生成目录的详细步骤: 首先,你...

    文件目录自动生成(含文件链接).rar

    可以自动生成文件夹所有目录文件链接。文件目录管理宏,选择文件夹自动创建该文件夹下面的所有文件及文件夹的目录(超链接),更换目录excel位置后只需要点更新即可。 注意:文件夹超过9层的多出来的不会显示。不...

    Excel目录自动生成文件及使用方法(附带Excel加强工具)

    自己做了一个用于Excel内部自动生成目录,通过目录调用同文件下其他的表格的“Excel启用宏的工作薄”文件,这是通过2010Excel做的。2007应该也能用,大家试试。内带有使用方法及Excel加强工具。

    excel自动生成创建表sql语句,支持MySql,Oracle,SQLServer三种创建方式,方便管理

    excel自动生成创建表语句,支持MySql,Oracle,SQLServer三种创建方式,自动生成目录文档,方便查看与管理。

    文件目录自动生成工具

    压缩包内的“文件目录自动生成.xls”很可能是该工具的实例或者配套模板,用户可以打开这个Excel文件来了解如何使用工具生成目录,或者直接导入自己的文件路径开始生成目录。 总结来说,"文件目录自动生成工具"是一...

    excel 电子表格工作表自动生成工作表目录

    1. **大型报告**:当Excel文档包含大量工作表时,自动生成目录可以帮助快速浏览各个部分。 2. **项目管理**:在进行项目跟踪或数据管理时,目录可以方便地跳转到特定的工作表查看相关信息。 3. **财务报表**:财务...

    excel生成目录和返回目录超链接

    "Excel生成目录和返回目录超链接"这个主题就是解决这个问题的一种方法,它利用了Excel的宏功能来自动化这个过程。让我们深入探讨这个知识点。 首先,"目录"在Excel中的作用是提供一个快速跳转到各个工作表的参考,...

    Office2007Word目录自动生成详细方法

    通过以上步骤,你可以轻松地在Office 2007的Word中自动生成目录,使文档更加专业且易于阅读。记得在编辑过程中定期更新目录,以确保页码的准确性。此外,合理运用Word的样式功能,不仅可以简化目录生成过程,还能让...

    phpexcelreader读取excel自动生成表和字段

    至于如何根据Excel数据自动生成数据库表和字段,你需要进一步处理读取的数据。通常,每个Excel工作表对应一个数据库表,每列则对应表的一个字段。你可以解析列名作为字段名,遍历行数据作为记录,然后构建SQL语句来...

    导入Excel快速生成DTO

    这个"导入Excel快速生成DTO"的工具解决了这个问题,它能够自动生成符合Excel结构的Java类,包括属性、getter和setter方法,甚至可能还包括构造函数和其他辅助方法,极大地简化了开发过程。 使用这样的工具,开发者...

    读取excel自动生成sql文的txt文件

    这个“读取excel自动生成sql文的txt文件”的工具显然是为了解决这一问题而设计的。它允许用户通过Excel表格结构快速生成对应的SQL插入语句,极大地提高了工作效率。 首先,我们需要理解Excel文件的结构。Excel是一...

    文件目录自动生成(含文件链接)

    EXCEL表做的,自动在文件夹内生成所有文件的文件目录。

    基于Python实现Excel数据处理自动化生成Word文档(含索引目录 分页).zip

    # 生成目录 doc.add_page_break() doc.add_heading('目录', level=1) doc.add_paragraph('', style='TOC1') doc.add_page_break() ``` 5. **分页**:在Word中插入分页符可以方便地控制每页的内容。在python-docx中...

    文件目录管理VBA自动生成 (1)_VBA目录生成_VBa_VBA文件目录自动生成_vba自动目录_

    本话题将深入探讨如何利用VBA自动生成文件目录,实现快速查找和访问文件。 首先,我们需要理解VBA的基本结构和语法。VBA是基于事件驱动的编程语言,这意味着它会根据用户在应用中的操作执行特定的代码块,例如打开...

    自动生成文件夹目录

    “mulushengchengqi”这个名字看起来像是一个程序或者文件夹的名称,但没有明确的扩展名,可能是生成目录时的示例文件,或者是软件本身的可执行文件。 总的来说,"自动生成文件夹目录"这一功能是现代信息技术对文件...

    excel自动生成二维码标签.rar

    这个名为"excel自动生成二维码标签.rar"的压缩包包含了实现这一功能的关键组件。主要包含两个文件:调用二维码.bas和QRmake.exe。 首先,我们要理解"调用二维码.bas"是一个Visual Basic for Applications (VBA)宏,...

    自动生成文件夹目录树

    自动生成文件夹目录树,方便使用EXCEL用户

    自动导入目录中TXT文件生成EXCEL文件的宏

    可以使用该EXCEL文件,开启宏以后自动导入目录中的txt文件,并生与目录名称相同的excel文件

    unity 自动excel转json插件

    4. **自动导出到Unity**:转换后的JSON文件可以直接保存到Unity项目的Assets目录下,供游戏逻辑使用。 5. **支持预览和编辑**:可能提供预览功能,让开发者在转换前检查数据的正确性,并在必要时进行编辑。 6. **...

Global site tag (gtag.js) - Google Analytics