跳至主要内容

如何在工作表中列出所有Excel文件的属性?

Author: Sun Last Modified: 2025-05-07

在本文中,我介绍了一段VBA代码,用于在工作表中列出当前工作簿的所有属性。

1. 按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 单击 插入 > 模块,并将以下代码粘贴到空白模块中。

VBA:列出所有属性

Sub WBProperties()
'UpdatebyKutools20191031
    Dim xWB As Workbook
    Dim xF As Long
    Dim xStr As String
    Dim xWSh As Worksheet
    On Error Resume Next
    Application.DisplayAlerts = False
    xStr = "Workbook Properties"
    Set xWB = Application.ActiveWorkbook
    Set xWSh = xWB.Worksheets.Item(xStr)
    If Not xWSh Is Nothing Then
        xWSh.Delete
    End If
    Set xWSh = xWB.Worksheets.Add
    xWSh.Name = xStr
    xWSh.Range("A1").Value = "Property"
    xWSh.Range("B1").Value = "Value"
    With xWB
        For xF = 1 To .BuiltinDocumentProperties.Count
            xWSh.Range("A65536").End(xlUp).Offset(1, 0).Value = _
            .BuiltinDocumentProperties.Item(xF).Name
            xWSh.Range("A65536").End(xlUp).Offset(0, 1).Value = _
            .BuiltinDocumentProperties.Item(xF).Value
        Next xF
    End With
    Application.DisplayAlerts = True
End Sub

copy and paste the vba code into the module

3. 按 F5 键运行代码,会在当前工作表的前面创建一个名为“Workbook Properties”的新工作表,其中列出了当前工作簿的所有属性。



其他操作(文章)

在Excel启动时禁用加载项 您可能已经在Microsoft Excel中安装了一些加载项,但现在您需要在Excel启动时禁用某个指定的加载项。如何解决这个问题?本文中的方法可以帮助您。

在Excel中将每个工作表导出并保存为单独的新工作簿 假设您想将一个或多个工作表导出并保存为一个新的工作簿,您会如何处理?通常情况下,您可以复制每个工作表并将其粘贴到新的工作簿中。但在这里,我们为您提供了一些方便的技巧来处理它:

一段VBA代码列出Excel中的所有加载项 在Excel中,您可能添加或插入一些加载项以更好地处理数据。我们知道,可以进入选项窗口查看所有加载项,但有没有办法在工作表中列出所有加载项呢?


  • 超级公式栏(轻松编辑多行文本和公式);阅读布局(轻松读取和编辑大量单元格);粘贴到筛选区域...
  • 合并单元格/行/列并保留数据;拆分单元格内容;合并重复行并求和/平均值... 防止重复单元格;比较区域...
  • 选择重复或唯一行选择空白行(所有单元格为空);在多个工作簿中进行超级查找和模糊查找;随机选择...
  • 精准复制多个单元格而不改变公式引用;自动创建对多个工作表的引用;插入项目符号、复选框等...
  • 收藏并快速插入公式、区域、图表和图片;用密码加密单元格创建邮件列表并发送电子邮件...
  • 提取文本,添加文本,按位置删除,删除空格;创建并打印分页小计;在单元格内容和批注之间转换...
  • 超级筛选(保存并应用筛选方案到其他工作表);按月/周/日高级排序,频率等;按粗体、斜体特殊筛选...
  • 合并工作簿和工作表;基于关键列汇总表格;将数据分割到多个工作表批量转换 xls、xlsx 和 PDF...
  • 数据透视表按周数、星期几等分组... 用不同颜色显示未锁定、已锁定单元格高亮显示包含公式的单元格/名称...
kte tab 201905
  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
  • 在同一窗口的新标签页中打开和创建多个文档,而不是在新窗口中。
  • 将您的生产力提高 50%,每天为您减少数百次鼠标点击!
officetab bottom