尝试查找是否位于Excel中信息侧的数据

Question

我已经在文件> 信息> 属性> 自定义中创建了自定义属性，并将其命名为 Procent 。稍后，它将显示在Excel的信息屏幕中（文件> 信息）。查看图片：

即使自定义属性的值已更改，信息屏幕上的

Procent 也不会更改。我试图在自定义属性中删除它，但它仍在信息屏幕中。

我可以找到存储在信息屏幕上的数据，以便可以通过VBA进行更改吗？我们使用它在SharePoint中显示在该特定文件中我们做了多少。

/ Joakim

Answer 1

使用.CustomDocumentProperties属性（听起来有点愚蠢，我知道...）

例如，我们可以像这样遍历所有单独的自定义属性名称和值，创建所有自定义属性的有序索引列表：

Private Sub print_properties()
    Dim index As Integer
    index = 1

    For Each property In ThisWorkbook.CustomDocumentProperties
      Sheets("Sheet1").Cells(index, 1) = property.Name
      Sheets("Sheet1").Cells(index, 2) = property.Value
      index = index + 1
    Next property

End Sub

我创建了两个自定义属性作为示例。启动该过程后，我得到以下结果：

所以现在我将知道哪个属性具有哪个ID。 在这种情况下，Procent为2。

---

  

因此，为回答您的问题，简要地说，您可以参考   通过以下方式 ThisWorkBook.CustomDocumentProperties(2).Value

     

（将2更改为您的Procent属性ID）：