如何在工作表中列出所有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
3. 按 F5 键运行代码,会在当前工作表的前面创建一个名为“Workbook Properties”的新工作表,其中列出了当前工作簿的所有属性。
在Excel启动时禁用加载项 您可能已经在Microsoft Excel中安装了一些加载项,但现在您需要在Excel启动时禁用某个指定的加载项。如何解决这个问题?本文中的方法可以帮助您。
在Excel中将每个工作表导出并保存为单独的新工作簿 假设您想将一个或多个工作表导出并保存为一个新的工作簿,您会如何处理?通常情况下,您可以复制每个工作表并将其粘贴到新的工作簿中。但在这里,我们为您提供了一些方便的技巧来处理它:
一段VBA代码列出Excel中的所有加载项 在Excel中,您可能添加或插入一些加载项以更好地处理数据。我们知道,可以进入选项窗口查看所有加载项,但有没有办法在工作表中列出所有加载项呢?
- 超级公式栏(轻松编辑多行文本和公式);阅读布局(轻松读取和编辑大量单元格);粘贴到筛选区域...
- 合并单元格/行/列并保留数据;拆分单元格内容;合并重复行并求和/平均值... 防止重复单元格;比较区域...
- 选择重复或唯一行;选择空白行(所有单元格为空);在多个工作簿中进行超级查找和模糊查找;随机选择...
- 精准复制多个单元格而不改变公式引用;自动创建对多个工作表的引用;插入项目符号、复选框等...
- 收藏并快速插入公式、区域、图表和图片;用密码加密单元格;创建邮件列表并发送电子邮件...
- 提取文本,添加文本,按位置删除,删除空格;创建并打印分页小计;在单元格内容和批注之间转换...
- 超级筛选(保存并应用筛选方案到其他工作表);按月/周/日高级排序,频率等;按粗体、斜体特殊筛选...
- 合并工作簿和工作表;基于关键列汇总表格;将数据分割到多个工作表;批量转换 xls、xlsx 和 PDF...
- 数据透视表按周数、星期几等分组... 用不同颜色显示未锁定、已锁定单元格;高亮显示包含公式的单元格/名称...

- 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
- 在同一窗口的新标签页中打开和创建多个文档,而不是在新窗口中。
- 将您的生产力提高 50%,每天为您减少数百次鼠标点击!
