Attributes Property

Microsoft Word Visual Basic

Attributes Property

Returns an XMLNodes collection that represents the attributes for the specified element. All XMLNode objects in the XMLNodes collection returned by using the Attributes property have a NodeType property value of wdXMLNodeAttribute.

expression.Attributes

expression    Required. An expression that returns an XMLNode object.

Example

The following example adds the author attribute to the book element in the active document and then sets the value of the attribute.

    Sub AddIDAttribute()
    Dim objElement As XMLNode
    Dim objAttribute As XMLNode

    For Each objElement In ActiveDocument.XMLNodes
        If objElement.NodeType = wdXMLNodeElement Then
            If objElement.BaseName = "book" Then
                
                Set objAttribute = objElement.Attributes _
                    .Add("author", objElement.NamespaceURI)

                objAttribute.NodeValue = "David Barber"
                
                Exit For
            End If
        End If
    Next
End Sub