Layer.Index

Property Index As Long

Member of Layer

The Index property returns the index number of the layer within the Layers collection.

The Index property returns a read-only value.

The following code example adds a text string named Layer: and the index number of each layer to the lower-left corner of each layer in the active page:

Sub Test() 
 Dim l As Layer 
 For Each l In ActivePage.Layers 
  l.CreateArtisticText 0, 0, "Layer:" & l.Index, , , 10 
 Next l 
End Sub