如何在工作表中列出所有Excel文件的属性?
在本文中,我介绍了一个VBA代码,以在工作表中列出活动工作簿的所有属性。
1。 按 Alt + F11键 键以启用“ Microsoft Visual Basic应用程序”窗口。
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
要运行该代码,请在活动工作表的前面创建一个名为“工作簿属性”的新工作表,该工作表列出了活动工作簿的所有属性。
其他操作(文章)
在Excel启动时禁用加载项您可能已经在Microsoft Excel中安装了一些加载项,但是现在您需要在Excel启动时禁用指定的加载项。 如何解决这个问题呢? 本文中的方法可以为您提供帮助。
将每个工作表导出并保存为Excel中单独的新工作簿假设您要导出一个或多个工作表并将其另存为新工作簿,您将如何处理? 通常,您可以复制每个工作表并粘贴到新工作簿中。 但是在这里,我们为您带来一些方便的技巧来应对它:
VBA代码列出Excel中的所有加载项在Excel中,您可以添加或插入一些加载项以更好地处理数据。 众所周知,我们可以转到“选项”窗口查看所有加载项,但是有什么方法可以在工作表中列出所有加载项?
最佳办公效率工具
Kutools for Excel 解决您的大部分问题,并将您的工作效率提高 80%
超级公式栏 (轻松编辑多行文本和公式);
阅读版式 (轻松读取和编辑大量单元格);
粘贴到过滤范围...
合并单元格/行/列 和保存数据; 拆分单元格内容;
合并重复的行和总和/平均值...防止细胞重复;
比较范围...
选择重复或唯一 行;
选择空白行 (所有单元格都是空的);
超级查找和模糊查找 在许多工作簿中; 随机选择...
确切的副本 多个单元格,无需更改公式参考;
自动创建参考 到多张纸;
插入项目符号,复选框等...
收藏并快速插入公式,范围,
图表和图片;
加密单元 带密码
创建邮件列表 并发送电子邮件...
提取文字,添加文本,按位置删除,
删除空间; 创建和打印分页小计;
在单元格内容和注释之间转换...
超级滤镜 (将过滤方案保存并应用于其他工作表);
高级排序 按月/周/日,频率及更多;
特殊过滤器 用粗体,斜体...
结合工作簿和工作表; 根据关键列合并表;
将数据分割成多个工作表;
批量转换xls,xlsx和PDF...
数据透视表分组依据 周号,周几等
显示未锁定的单元格 用不同的颜色
突出显示具有公式/名称的单元格...
***
功能齐全的30天免费试用版... ***
Office Tab - 为 Office 带来标签式界面,让您的工作更轻松
在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
每天将您的工作效率提高50%,并减少数百次鼠标单击!