Share via


Index Property [Publisher 2003 VBA Language Reference]

Returns a Long that represents the position of a particular item in a specified collection. Read-only.

expression.Index

expression Required. An expression that returns one of the objects in the Applies To list.

Example

The following example loops through the MailMergeDataFields collection and displays the Index and Name properties for each field.

Dim mmfLoop As MailMergeDataField

With ActiveDocument.MailMerge.DataSource
    If .DataFields.Count > 0 Then
        For Each mmfLoop In .DataFields
            Debug.Print "Field " & mmfLoop.Name _
                & " / Index " & mmfLoop.Index
        Next mmfLoop
    Else
        Debug.Print "No fields to report."
    End If
End With

The following example loops through the Plates collection and displays the Index and Name properties for each plate.

Dim plaLoop As Plate

If ActiveDocument.Plates.Count > 0 Then
    For Each plaLoop In ActiveDocument.Plates
        Debug.Print "Plate " & plaLoop.Name _
            & " / Index " & plaLoop.Index
    Next plaLoop
Else
    Debug.Print "No plates to report."
End If

Applies to | MailMergeDataField Object | MailMergeFilterCriterion Object | MailMergeMappedDataField Object | Plate Object | PrintablePlate Object