excel - 使用 VBA 设置 Sharepoint 标签/属性

Question

是否可以使用 VBA 设置 Sharepoint 文档（特别是 Excel）的标签。目前我知道处理此问题的唯一方法是将文件保存到 Sharepoint，在出现提示时设置标签，然后再次下载此文件并将其用作模板。

但是，我需要处理这些标签的几种不同排列，并且必须为每个标签创建一个单独的模板是一个主要的痛苦，特别是如果您需要修改模板，并且必须复制这些修改 10 次。

那么可以通过VBA做到这一点吗？我尝试在设置宏时录制宏，但它没有录制任何关于标签的内容

Answer 1

据我所知，我们可以在将Excel 文档上传到 Sharepoint 库之前在VBA中设置标签，方法是设置

Workbook.ContentTypeProperties

例如：

 ActiveWorkbook.ContentTypeProperties("Line of Business").Value = pLine
 ActiveWorkbook.ContentTypeProperties("Company Name").Value = pCompany
 ActiveWorkbook.ContentTypeProperties("Year").Value = pYear

我会链接一些阅读材料以了解更多信息：它可能有用：[John Chapman 的 SharePoint 博客：从 Excel VBA 更新 SharePoint 文档属性]

http://www.sharepointjohn.com/sharepoint-2007---update-sharepoint-document-property-from-excel-vba/ _

请注意，某些类型的属性存在一些问题：请参阅 设置将在 Sharepoint 中使用的自定义文档属性和此线程

Answer 2

我有同样的问题。我使用的解决方法如下

On Error Resume Next
Application.DisplayAlerts = False
ThisWorkbook.SaveAs Pth
ThisWorkbook.ContentTypeProperties("Report Type").Value = "BranchManagement"
ThisWorkbook.SaveAs Pth
Workbooks(ThisWorkbook.Name).CheckIn
Application.DisplayAlerts = True
On Error GoTo 0

在我的情况下，我还必须在保存后检查这本书。希望这可以帮助！