Word 2007 VBA: ActiveDocument.CustomXMLParts

Question

In this tutorial (and many others), there's an integer in the CustomXMLParts object collection Load method that I can't find an explanation for. The Word 2007 VBA Reference doesn't seem to list the Load method either:

  ''# Load CustomerData.xml file
  ActiveDocument.CustomXMLParts.Add
  ActiveDocument.CustomXMLParts(4).Load ("c:\CustomerData.xml") 

What does the 4 represent?

Answer 1

There are always three built-in CustomXMLParts in every .docx (created by Word 2007/2010 - not necessarily a .docx created by the Open XML SDK). Namely:

<cp:coreProperties xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:cp="http://schemas.openxmlformats.org/package/2006/metadata/core-properties"&gt;&lt;dc:creator&gt;&lt;/dc:creator&gt;&lt;cp:keywords/&gt;&lt;dc:description/&gt;&lt;dc:subject/&gt;&lt;dc:title/&gt;&lt;cp:category/&gt;&lt;cp:contentStatus/&gt;&lt;/cp:coreProperties&gt;

<Properties xmlns="http://schemas.openxmlformats.org/officeDocument/2006/extended-properties"&gt;&lt;Company/&gt;&lt;Manager/&gt;&lt;/Properties&gt;

<CoverPageProperties xmlns="http://schemas.microsoft.com/office/2006/coverPageProps"&gt;&lt;PublishDate/&gt;&lt;Abstract/&gt;&lt;CompanyAddress/&gt;&lt;CompanyPhone/&gt;&lt;CompanyFax/&gt;&lt;CompanyEmail/&gt;&lt;/CoverPageProperties&gt;

So 4 here just means, after you've done ActiveDocument.CustomXMLParts.Add to add a fourth one "get the fourth one". If you had more, you would just use the next available index number. Instead of 4, I'd probably just use this instead:

Dim ap As Document
Set ap = ActiveDocument
ap.CustomXMLParts.Add
ap.CustomXMLParts(ap.CustomXMLParts.Count).Load ("C:\CustomerData.xml")