expression.Index
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example uses the Index property to find the position of the specified Discussion object in the Discussions collection.
Set myResponse = dscDiscussions(1).Discussions.Add _
("Supply information", "Staples are here!", "Staples")
MsgBox myResponse.Index