时间戳

首页 > 解决方案 > 通过 VBA 提取用户添加的 SharePoint 文件的自定义属性

vba - 通过 VBA 提取用户添加的 SharePoint 文件的自定义属性

问题描述

我将 SharePoint 连接到网络驱动器。我们在 SharePoint 文件中添加了一些属性，例如“状态”和“拒绝原因”。我们想使用 VBA 提取这些属性。

![自定义添加属性

我们已经尝试使用文档的扩展属性访问这些属性，但它在那里不可用。

{

Sub LoopThroughFiles()

Dim oFSO, Oshell, ODir, wordapp, Doc As Object
Dim oFolder As Object
Dim oFile As Object
Dim i As Integer
'Dim Doc As Document
Set Oshell = CreateObject("Shell.Application")

Set wordapp = CreateObject("word.Application")
Set oFSO = CreateObject("Scripting.FileSystemObject")

Set oFolder = oFSO.GetFolder("S:\Shared Documents\General\")
Set ODir = Oshell.Namespace("S:\Shared Documents\General\")

For Each oFile In ODir.Items
'MsgBox oFile.Status
'Workbook.Open file:=oFile
'Set Doc = wordapp.Documents.Open(oFile.Path)
'MsgBox Doc.BuiltinDocumentProperties("status")
For i = 0 To 1000


'MsgBox ODir.GetDetailsOf(sFile, 0).Value
    Cells(i + 1, 1) = ODir.GetDetailsOf(oFile, i)
    Cells(i + 1, 2) = ODir.GetDetailsOf(, i)


    Next

Next oFile

End Sub
}

你能帮我们提取那些吗？

提前致谢

标签： vbasharepoint

解决方案

尝试使用“CustomDocumentProperties”而不是“BuiltinDocumentProperties”

推荐阅读