VBA如何访问excel文档的文件属性中的自定义属性？
如何在VBA中访问excel文档中的文件属性中的自定义属性（需要将他们写入特定的单元格）？
另外，还有属性中的摘要除了作者和标题之外其他的也不会访问，求大侠指正！
问题点数：0、回复次数：4Top
1 楼klbt（快乐白兔）回复于 2004-01-27 02:54:46 得分 0
upTop
2 楼henrryzhang（North Wolf）回复于 2004-01-29 09:30:14 得分 0
DocumentProperty 对象
每一工作簿有一个内置文档属性的集合和一个自定义文档属性的集合。每一集合由一个 DocumentProperties 对象表示，每一集合包含独立的 DocumentProperty 对象。
使用 BuiltinDocumentProperties 属性可返回内置文档属性的集合，使用 CustomDocumentProperties 属性可返回自定义文档属性的集合。使用 Item 属性可返回集合中单个成员。
下列示例对“Title”内置文档属性进行设置。
ActiveWorkbook.BuiltinDocumentProperties.Item("Title") _
.Value = "Year-End Sales Results"
Top
3 楼henrryzhang（North Wolf）回复于 2004-01-29 09:30:38 得分 0
BuiltinDocumentProperties 属性
返回一个 DocumentProperties 集合，该集合代表指定工作簿的所有内置文档属性。只读。
说明
本属性返回的是内置文档属性的整个集合。通过指定属性的名称或集合中的索引号（数字），用 Item 方法可返回集合中的单个成员（一个 DocumentProperty 对象）。
可通过索引值或名称来引用文档属性。以下列示的是有效的内置文档属性的名称：
Title
Subject
Author
Keywords
Comments
Template
Last Author
Revision Number
Application Name
Last Print Date
Creation Date
Last Save Time
Total Editing Time
Number of Pages
Number of Words
Number of Characters
Security
Category
Format
Manager
Company
Number of Bytes
Number of Lines
Number of Paragraphs
Number of Slides
Number of Notes
Number of Hidden Slides
Number of Multimedia Clips
Hyperlink Base
Number of Characters (with spaces)
无须通过容器应用程序对每一内置文档属性值进行定义。如果 Microsoft Excel 对某个内置文档属性值没有定义，则读取该文档属性的 Value 属性时将产生错误。
由于 Item 方法是 DocumentProperties 集合的默认方法，所以下列语句是相同的：
BuiltinDocumentProperties.Item(1)
BuiltinDocumentProperties(1)
使用 CustomDocumentProperties 属性可返回自定义文档属性的集合。
Top
4 楼henrryzhang（North Wolf）回复于 2004-01-29 09:31:03 得分 0
DocumentProperties 集合对象
每一工作簿有一个内置文档属性的集合和一个自定义文档属性的集合。每一集合由一个 DocumentProperties 对象表示，每一集合包含独立的 DocumentProperty 对象。
使用 BuiltinDocumentProperties 属性可返回内置文档属性的集合，使用 CustomDocumentProperties 属性可返回自定义文档属性的集合。
下列示例在第一张工作表中显示内置文档属性列表。
rw = 1
Worksheets(1).Activate
For Each p In ActiveWorkbook.BuiltinDocumentProperties
Cells(rw, 1).Value = p.Name
rw = rw + 1
Next
Top
